Korumalı sayfada temizleme butonu sorunu

[NADİR YILDIZ]

Arkadaşlar ekteki dosyada sarı alandaki yazıları temizle butonu ile temizliyorum.ancak sayfayı korumaya aldığım zaman temizleme yapmıyor hata mesajı veriyor..sorun nerede acaba..sayfa koruma parolası 2016

 

[Orion1]

Önce sarı alanı seçip hücreleri kilitleyiniz.

Sub Düğme20_Tıklat()
ActiveSheet.Unprotect "2016"
Range("C13:J500").ClearContents
ActiveSheet.Protect "2016"
End Sub

 

[NADİR YILDIZ]

Teşekkür ederim Evren bey...

 

[Orion1]

Teşekkür ederim Evren bey...

Rica ederim.
İyi çalışmalar.