AccessTr.neT

Tam Versiyon: Excelde Hücreye Girilen Gsm No Yu Diğer Hücrede Otomatik Biçimlendirmek
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2 3 4 5 6
Valla @berduş hocam dikkatsizim vs falan ama bir de bahtsız bedeviliğim var kabul edin garip hatalar hep beni buluyor. Ben de çalışmıyor altı üstü iki stringi birleştirdim ama çalışmadı dediğim gibi herhalde farklı bir şey var diye düşündüm sonucta bende çalışmıyor bilemiyorum foruma yüklediğim sizinde üzerinde denediğiniz dosya sonucta aynı.

offffff gsm yerine telefon no hücresine yazmışım veriyi bende neden olmuyor diye çıldırıyorum. Gecenin yarısında had safhada dikkatsizlik özür dilerim.
@berduş hocam bende bu şekilde yazıyor hücreye Img-cray sizin güncelleme de çalışıyor dediğiniz gifte gsm no textbox ında veri zaten +905459001010 gibi yazılı. Fakat normalde forma bir kaydı güncelleme için çektiğimde kayıt (545) 900-0001 şeklinde gözükür. Sizin gifte nasıl o şekilde gözüküyor anlamadım.

[Resim: do.php?img=11028]
dosyanızın son halini ekleyin

(13/05/2021, 01:15)Oğuz Türkyılmaz yazdı: [ -> ]offffff gsm yerine telefon no hücresine yazmışım veriyi bende neden olmuyor diye çıldırıyorum
ben size 6. mesajda GSM sütununda veri olmadığını söylemiştim ama...
(13/05/2021, 01:34)berduş yazdı: [ -> ]dosyanızın son halini ekleyin

(13/05/2021, 01:15)Oğuz Türkyılmaz yazdı: [ -> ]offffff gsm yerine telefon no hücresine yazmışım veriyi bende neden olmuyor diye çıldırıyorum
ben size 6. mesajda GSM sütununda veri olmadığını söylemiştim ama...


@berduş hocam dosyanın orjinal halini kopyalayıp 1000 küsur satırı silip foruma yükledim başka hiç bir şey değiştirmedim. Orjinal halinde benim dediğim gibi formatlı gözüküyor ama yüklediğim kopyada sizinki gibi eski kayıtlarda
5459080001
ama yeni deneme kayıtlarında
(545) 908-0001

şeklinde.
son kayıtların hepsinde verileriniz (262) 352-3163 formatında dolayısıyla sonucun da +90(262) 352-3163 olması normal
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
Sayfalar: 1 2 3 4 5 6