(13/05/2021, 02:10)berduş yazdı: bu durumda replace,regexp yada döngü aracılığıyla sayısal olmayan tüm verilerin silinmesi sağlanabilir
@
berduş hocam bu dediğiniz yöntemlerle şöyle bir makro yazılabilirmi. 6.sütundaki tüm verileri aynen 30 sütuna yazdırdığımızı farzedelim düzenlenecek makroyu bir butona atayıp çalıştırdığımızda 30.sütundaki
(545) 908-0001 şeklinde olan tüm verileri
+905459080001 şekline çevirtebilirmiyiz. Böylesi acaba daha mı basit olur. Bilemedim.
@
feraz hocam kod güncellemede başarılı oldu ama yeni kayıt da eskisi gibi kaydetti.
Ben veri eklemede(kaydet) olayında denemiştim çalışmıştı.
(13/05/2021, 02:31)feraz yazdı: Ben veri eklemede(kaydet) olayında denemiştim çalışmıştı.
güncellemede de şöyle çalışor güncellenecek kayıtda gsm hanesi boşsa oraya yazdığınızda doğru sonucu veriyor ama eğer güncellenecek bilgilerde gsm hanesi dolu geliyorsa onu değiştirip kaydettiğinizde eskisi gibi kaydediyor, doğru kayıt yapmıyor.
Kaydetme yada güncellemeden önce .Cells(SonSatir, 30).NumberFormat = "@" burdaki gibi numberformat ekletin metin olarak.Kod sadece bir örnek orayı ayarlarsınız.