Skip to main content

AccessTr.neT


Excel Vba Da Veri Kaydederken Diğer Sayfaya Kopyasını Almak.

Oğuz Türkyılmaz
Oğuz Türkyılmaz
28
2104

Excel Vba Da Veri Kaydederken Diğer Sayfaya Kopyasını Almak.

#6
@feraz hocam ilk kayıt da Whatsapp sayfasına kaydı kopyalamadı İkinci bir kayıt yaptığımda da sonuç değişmedi. Whatsapp sayfasına kopyalama işlemi gerçekleşmiyor.

Kod:
If TextBox_Gsm.Value <> "" Then
              
            TextBox_Gsm.Value = Replace(Replace(Replace(Replace(TextBox_Gsm.Value, "(", ""), ")", ""), " ", ""), "-", "")
            ThisWorkbook.Worksheets("Ana_Sayfa").Cells(SonSatir, 30).NumberFormat = "@"
            ThisWorkbook.Worksheets("Ana_Sayfa").Cells(SonSatir, 30) = "+90" & TextBox_Gsm.Value
        
        
            ThisWorkbook.Worksheets("WHATSAPP").Cells(Rows.Count, 1).End(3)(2, 1).NumberFormat = "@"
            ThisWorkbook.Worksheets("WHATSAPP").Cells(Rows.Count, 1).End(3)(2, 1).Value = "+90" & TextBox_Gsm.Value
        
        Else

[Resim: do.php?img=11039]
[Resim: do.php?img=11040]
Access Çekirgesi 
[Resim: img-cray.gif]


Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
RE: Excel Vba Da Veri Kaydederken Diğer Sayfaya Kopyasını Almak. - Yazar: Oğuz Türkyılmaz - 16/05/2021, 00:34
Task