Makro kodu ile ismi belirtilen sayfaya koruma koyma ve açma

[Kavinsky]

Üstatlar merhaba.
Benim elimdeki sistemde korumalı olan sayfaya kod ile veri eklemeye çalışıyorum ama sayfa korumalı olduğu için ve normal şartlarda veri ekleyeceğim hücrenin kilidini açmamam gerektiği için (yanlışlıkla veri silinirse büyük sıkıntı teşkil eder) istediğim veriyi korumayı açmadan haliyle eklemiyorum.

Elimde sayfa kilidi açan

ActiveSheet.Unprotect

ve sayfayı kilitleyen

ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True

kodu var ama benim istediğim şey makronun içinde sheet seçme komutu vermeden direk YÖNETİM isimli sayfanın korumasını aç ve YÖNETİM isimli sayfayı koru.İşin içinden çıkamadım böyle bir şey mümkünse yardımlarınızı bekliyorum,teşekkür ederim.

 

[Haluk]

Aşağıdaki gibi olabilir ....

Sheets("YÖNETİM").Unprotect Password:="123"

Sheets("YÖNETİM").Protect Password:="123"

.

 

[Kavinsky]

Teşekkür ederim ,elinize sağlık Haluk hocam.