Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan

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

Oğuz Türkyılmaz
Oğuz Türkyılmaz
Excel Cevaplanmış Soruları
28
2136

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

#15
Oğuz Türkyılmaz
Aktif Üye
Oğuz Türkyılmaz
Bul
Aktif Üye
Adı Soyadı: Oğ.... Tü....
Yaşı: 55
Konum: Antalya
Ofis Versiyonu: Ofis 2019 64 Bit
Son Oturumu: 03/05/2023,09:23
Yorumları: 1.583
Konuları: 265
Kayıt Tarihi: 08/02/2018
Teşekkür Puanı: 0
Mesleğiniz: İşletmeci
@feraz hocam kayıt ekleme sorununu hallettim. Güncelleme ile ilgili sorunu nasıl aşabilirim. Güncelleme yapmak istediğimde koda whatapp sayfasında hangi satırı güncelleyeceğini, nasıl gösterebilirim. End(3) dolayısıyla güncellemede de yeni kayıt yapar gibi en son satıra kaydediyor.

Kod:
  End With
       
        If TextBox_Gsm.Value <> "" Then
             
            TextBox_Gsm.Value = Replace(Replace(Replace(Replace(TextBox_Gsm.Value, "(", ""), ")", ""), " ", ""), "-", "")
            ThisWorkbook.Worksheets("Ana_Sayfa").Cells(Guncelle, 30).NumberFormat = "@"
            ThisWorkbook.Worksheets("Ana_Sayfa").Cells(Guncelle, 30) = "+90" & TextBox_Gsm.Value
       
            ThisWorkbook.Worksheets("WHATSAPP").Unprotect ("171717")
            ThisWorkbook.Worksheets("WHATSAPP").Cells(Rows.Count, 1).End(3)(2, 1).NumberFormat = "@"
            ThisWorkbook.Worksheets("WHATSAPP").Cells(Rows.Count, 1).End(3)(2, 1) = "+90" & TextBox_Gsm.Value
            ThisWorkbook.Worksheets("WHATSAPP").Protect
       
        Else
       
        End If
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, 17:25