E

Çözüldü İlk iki sayı ayırma

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

excelismail

Site Üyesi
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Merhabalar,

Excel tablomda 90 ile başlayan telefon numaraları ayrılıp diğer sütuna telefon numaraları 5 ile başlaması için vba kodu ile yapılabilir mi?
Şimdiden teşekkürler.
 
Merhaba.

Hatalı cevap vermemek bakımından,
birkaç satırlık örnek veri ve olması gereken sonucun gösterildiği bir örnek belge yükler misiniz?
Verilerin durumuyla ilgili farklı seçenekler varsa bunlara dair örnek veriler olmasında yarar var.

.
 
Merhabalar;
Numaraların şu formatta olduğu varsayılmıştır 905555555555
Bu şekilde ise aşağıdaki kodları kullanabilirsiniz.

Not: Numaralar A sütununda, yeni durumu B sütununa yazıldı.
Çalışma dosyanıza göre sütunun başlıklarını değiştiriniz.
VBA:
Görüntülemek için giriş yapmanız gerekmektedir.
(5 satır)
 
İstediğiniz böyle bir şey olmalı.
Veriler kendi bulundukları hücreye düzeltilmiş olarak yazılır.

-- kırmızı 1, ilk veri satırı,
-- mavi 3, C sütununun sütun numarası.
-- Yeşil kısımdaki 3'ü 4 yaparsanız sonuç D sütununa yazılır.

VBA:
Görüntülemek için giriş yapmanız gerekmektedir.
(5 satır)

.
 
Merhabalar Sn. excelismail ;
Evet, belirttiğiniz şekilde görünür.
Paylaştığım kod sağdan 10 hane alır.
905555555555 bu yapıda olan numaralar 12 haneli, sağdan 10 hanesini aldığımızda istediğiniz gibi sadece 5 ile başlayan bölümü kalır.

Numaraların hepsi bu yapıda değilse, hatalı sonuç verir.
Bu nedenle Ömer Hocamın paylaştığı kodu kullanmanız doğru olur, Uzunluk kontrolü var. :)
 
Son sorum.
Numaraları tüm, son satır geçerli olacak şekilde nasıl ayarlama yapabilirim?
Sadece belir adette sayı değil de tüm satırdaki numaralar için çalışacak şekilde nasıl yapabilirim?
 
Paylaşılan her iki kod da ilgili sütundaki Son Dolu satıra kadar işlem yapar.

Kodları uyguladığınız çalışma dosyanızı yeniden paylaşır mısınız?
Dosya üzerinden bakalım.
 
Dosyanızda ki C1:C5 aralığındaki numaraları, C sütununda aşağı doğru farklı satırlara yazdım ve çalıştırdığımda Son Dolu satıra göre işlem yapıyor ve numaraları düzenliyor.
Kodları uyguladığınız dosyanızda hata ile karşılaşıyorsanız, o dosyanın örneğini paylaşır mısınız?
 
Merhabalar;
VBA:
Görüntülemek için giriş yapmanız gerekmektedir.
(1 satır)
bu satır 3 numaralı yani C sütunundaki son dolu satırın numarasını alır.
Döngü bu satır numarasına kadar işlem yapar.

Benim paylaştığım kodda ise son satır numarasını
VBA:
Görüntülemek için giriş yapmanız gerekmektedir.
(1 satır)
bu satır ile alırsınız. Bu satırda A sütununa göre son dolu satır numarası alır.

Bu iki satırı tüm Office versiyonlarında kullanabilirsiniz.
 
Ben kodları paylaşırken, dosyanızı görmemiştim.
A1 hücresinde Başlık varsayarak, işlemi 2. satırdan başlattım.
İlk satırdan başlaması için kod içindeki x=2 kısmını x=1 şeklinde değiştiriniz.
 
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Üst