Soru korumalı sayfada makro ile silme

[NADİR YILDIZ]

korumalı sayfada mavi alandakileri makro ile temizlemek istiyorum.nasıl bir kod yazılması gerekir

 

[recepkull]

Sub sil()

    ActiveSheet.Unprotect
    Range("V4:AA4").ClearContents
    ActiveSheet.Protect

End Sub

 

[NADİR YILDIZ]

sayın recepkull sayfa korumasını kaldır mesahı açılıyor

mesaj gelmeden direkt temizleme yaptırmak istiyorum

 

[NADİR YILDIZ]

arkadaşlar bu konuda yardımcı olabilir misiniz

 

[Mehmet Sait]

arkadaşlar bu konuda yardımcı olabilir misiniz

koruma şifreniz nedir?

 

[NADİR YILDIZ]

101881

 

[AdemCan]

Merhabalar;
recepkull 'un paylaşmış olduğu kodlar çalışıyor.
Ancak ActiveSheet.Unprotect ve ActiveSheet.Protect satırlarını bu şekilde kullanırsanız, sayfa koruma şifresi boş anlamına gelir.

Sayfa şifresi ile kullanmak için ilgili satırları şu şekilde değiştiriniz.
Çift Tırnak içerisine sayfa koruma şifrenizi yazınız.

ActiveSheet.Unprotect "kullandığınız_sifreyi_buraya_yazınız"
ActiveSheet.Protect "kullandığınız_sifreyi_buraya_yazınız"

 

[Mehmet Sait]

Deneyiniz

 

[NADİR YILDIZ]

tşk ler
sayın efsane
sayın dünya

 

[AdemCan]

Rica ederim, kolay gelsin, iyi çalışmalar.

 

[Mehmet Sait]

tşk ler
sayın efsane
sayın dünya

Rica ederim, kolay gelsin.