Korumalı sayfada çalışmayan makro

[suffocation]

Selamlar,

foruma yeni üye oldum ve Excel'in makro kısmıyla da yeni yeni ilgilenmeye başladım.


Sorum şu:

Bir kâr dağıtımı tablosu yaptım ve bazı hücreleri doldurulmak üzere açık bıraktım, kalan hücreler formül içeriyor ve doldurulan hücrelerdeki bilgileri kullanarak belli değerlere ulaşıyor.Neyse, en üste bir commandbutton yerleştirdim ve ona da:

Private Sub CommandButton1_Click()
Range("b5,b8,f10:f14,f16,f18:f20,f22,f24,f29").ClearContents

End Sub

böyle birşey yazdım. Butona basınca kodda görünen hücrelerin içeriğini siliyor ve buraya kadar sorun yok. Ancak, sayfayı koruduğumda, Excel "Runtime:1004" diye bir hata veriyor ve beni VB sayfasına atıyor, sanki "koda birşeyler ekle ki, istediğini yapayım" der gibi.

Sorum şu: Sayfa korumalıyken bu kodu nasıl çalıştırabilirim?

Şimdiden teşekkürler
SAYGILAR

 

[Mahmut Bayram]

Korumayı kaldır.
Kodu çalıştır.
Tekrar koruma koy.

[vb:1:5d8641d02a]Private Sub CommandButton1_Click()
ActiveSheet.Unprotect
Range("b5,b8,f10:f14,f16,f18:f20,f22,f24,f29").ClearContents
ActiveSheet.Protect
End Sub[/vb:1:5d8641d02a]

 

[suffocation]

çok teşekkür ederim, gerçekten çok işime yaradı. İki gündür başımda saç bırakmamıştım şu işi çözeceğim diye.