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
2125

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

#13
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
(16/05/2021, 16:38)Oğuz Türkyılmaz yazdı:
(16/05/2021, 16:05)feraz yazdı: Demek istediğim şuydu..unprotect kodu ana sayfanın korumasını kaldırıyor whatsap sayfanın değil.Whatsap sayfa içinde ekleyin.

Hocam biliyorum ama WHATTSAPP worksheet in hangi yordamına yazılacak onu çözemedim.

Kopyalama kodu

Kod:
TextBox_Gsm.Value = Replace(Replace(Replace(Replace(TextBox_Gsm.Value, "(", ""), ")", ""), " ", ""), "-", "")
            .Cells(Guncelle, 30).NumberFormat = "@"
            .Cells(Guncelle, 30) = "+90" & TextBox_Gsm.Value
Ana Sayfadan tetikleniyor. Ben se bu kod tetiklenirken aynı anda whatsapp sayfasının korumasının kaldırılması için kodu nereye yazacağımı  keşfedemedim.

Kod:
ThisWorkbook.Worksheets("WHATSAPP").Unprotect
            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
Bu şekilde çalıştırdım ama her seferinde şifre girmem gerekiyor. Şimdi bunu çözmeye çalışıyorum.
@feraz hocam onu da çözdüm. Çok zekiyim bugün Img-grin
Access Çekirgesi 
[Resim: img-cray.gif]


Son Düzenleme: 16/05/2021, 16:58, Düzenleyen: Oğuz Türkyılmaz.
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, 16:55
Task