(13/05/2021, 01:46)berduş yazdı: son kayıtların hepsinde verileriniz (262) 352-3163 formatında dolayısıyla sonucun da +90(262) 352-3163 olması normal

Hocam 1200 kayıtta da bu şekilde zaten sorunum bunu biçimlendirememek yapamamam normal yani

Normal Excel sayfasında konunun ilk mesajında belirttiğim gibi Hızlı doldurma yöntemi ile çözebiliyorum ama uğraştırıyor ve zaman alıyor onun için kod ile biçimlendirmeye çalışıyorum.

g sütunu içi ="+90" & F2 bir formül yok mudur @feraz hocam

---

tablo olduğundan ben yapamadım

(13/05/2021, 01:48)feraz yazdı: Alttaki koddda silinip telefon alanı normal olarak format yapılacak ayarlardan.

Private Sub TextBox_Telefon_Exit(ByVal Cancel As MSForms.ReturnBoolean)

    TextBox_Telefon.Value = Format(TextBox_Telefon.Value, "(###) ###-####")

End Sub

@feraz hocam o zaman müşteri bilgilerini userforma çektiğimde telefon bölümü 5459080001 gibi gözükecek okuması zor olacak.

---

(13/05/2021, 01:55)Oğuz Türkyılmaz yazdı:

(13/05/2021, 01:48)feraz yazdı: Alttaki koddda silinip telefon alanı normal olarak format yapılacak ayarlardan.

Private Sub TextBox_Telefon_Exit(ByVal Cancel As MSForms.ReturnBoolean)

    TextBox_Telefon.Value = Format(TextBox_Telefon.Value, "(###) ###-####")

End Sub

@feraz hocam o zaman müşteri bilgilerini userforma çektiğimde telefon bölümü 5459080001 gibi gözükecek okuması zor olacak.

Müşteri bilgilerini hiç bir zaman satırdan okumayacağım. Amaç userformda telefon numarası formatında gözüksün dü. yoksa diziveririz numaraları peşpeşe birde gözler benim gibi bozuksa ayıkla pirincin taşını

---

(13/05/2021, 01:54)berduş yazdı: g sütunu içi ="+90" & F2 bir formül yok mudur @feraz hocam

---

tablo olduğundan ben yapamadım

@feraz hocamın da tablolarla arası pek iyi değil

(13/05/2021, 01:55)Oğuz Türkyılmaz yazdı: TextBox_Telefon.Value = Format(TextBox_Telefon.Value, "(###) ###-####")

Bu kod hücreye yukardaki formatta kaydeder abey siz ise sorunuzda () bunlar olamayacak yazmışsınız kod içinde.

---

(12/05/2021, 22:52)Oğuz Türkyılmaz yazdı: .Cells(SonSatir, 30) = TextBox_Gsm.Value  BU hücreye kaydın (545) 900-0101  yerine +905459000101 şeklinde yapılması

Bu şekilde sorunuzda () olmayacak yazmışsınız.

---

Ben karıştırmışım abey telefon ve gsm textboxları özür.

@feraz hocam konuya açtığım  ilk mesajımı okudunuz mu sanırım yanlış anladınız. 6 nolu sütundaki GSM textboxında (545) 908-0001 şeklinde görünecek ama 30 nolu sütunda ki WHATSUP no sütununda +905459080001 şeklinde gözükmesi gerekiyor, whatsappa 30 uncu sütun üzerinden mesaj atacağım.

bu durumda replace,regexp yada döngü aracılığıyla sayısal olmayan tüm verilerin silinmesi sağlanabilir