Çalışma Kitabı Koruması

[kimfx]

Merhaba arkadaşlar,
Ben ARAÇLAR>KORUMA>ÇALIÞMA KİTABINI KORU dan çalışma kitabını korumak için şifreledim. Ancak çalışma kitabını koruduğum zaman,koşul oluştuğunda (tarihi geldiğinde) Sayfaların silinmesi için yazdığım makro çalışmıyor. Yani Çalışma Kitabı Korumalıyken Makro sayfaları silemiyor. Acaba Çalışma Kitabına Konulan koruma yine koşula bağlı bir makro içinde açılamazmı. yani koşul oluştuğu zaman önce korumayı kaldırsın sonra sayfaları silsin. Birde (MODULE ) içine yazılan makro başka bir module içine yazılan makro ile otomotik silinebilirmi. Yardımlarınızı bekliyorum Teşekkürler.
:hey: :lol: :arkadas:

 

[danersin]

[vb:1:d12ac65e19]Sub Makro1()
ActiveWorkbook.Protect Password:="a", Structure:=True, Windows:=False
End Sub
Sub Makro2()
ActiveWorkbook.Unprotect Password:="a"
End Sub[/vb:1:d12ac65e19]

İlk sorunuz için yukarıdaki kodlar kitaba şifre koyar ve kaldırır.
2. sorunuzu hiç denemedim ama bu linkte sn.raider'ın çalışması yol gösterebilir.

http://www.excel.web.tr/viewtopic.php?t=2370