DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Sub test()
For sut = 1 To 9000
Range("a" & sut) = Range("a" & sut) & "00"
Next
End Sub
Demekki olaya Fransız kalmış.İyice uzatmış.Fransız arkadaşımız bir fonksiyon gösterdi. concatenate komutu ile bir hücreye 00 ötekine telefon no yu yazıp fonksiyon ile hücreleri birleştiriyorsun.Böylece her rakamın başına 00 gelmiş oluyor.
İyi çalışmalar.
Demekki olaya Fransız kalmış.İyice uzatmış.
Hücre biçiminizi "00"## olarak ayarlayınız.
Necdet Bey,ellerinize sağlık verdiğiniz linktede ayrıntılı var zaten.Sanırım tam incelenmemiş.İşi kökten çözecek formülün adresini verdik, ama illa bir yabancının söylemesi gerekiyormuş demekki