Silme ekleme yerdeğiştirmenin manuel yapılmasını engelleme

[hsayar]

Şimdi
benim
tsb_xxxx.xls adlı bir çalışma kitabım var
bu kitapta
Günlük, tsb, devirler, aylık, tsb&"Günlükn2" (buradaki sayfa her makro çalıştıktan sonra ilave olur. yanitsb011007,tsb021007 diye ay sonuna kadar devam eder
sonra tsb011107,tsb021107... diye devam eder

bu çalışma sayfaları sağ tuş yardımıyla üzerine gelinip sil deyince "bu işlemi yapmak için yetkiniz yok uyarsını verip" günlük sayfası a3 e dönecek

yani çalışma kitabındaki hiç bir sayfa elle silinmeyecek (Makro ile n2 ye eşit değer varsa silip yeniden oluşturuyorum bu serbest)

ve hiç bir sayfada sağ tuş ile satır ekle, satır sil işlemi yapılmayacak. (makro ile yapılması serbest)

nasıl bir kod dizisi uygulanamlıdır.

 

[Orion1]

Bunun için sayfa sekme butonlarını gizleyebilirsiniz.

Sub Sekme_Butonlarini_gizle()
    ActiveWindow.DisplayWorkbookTabs = False
End Sub

Sub Sekme_butonlarini_goster()
    ActiveWindow.DisplayWorkbookTabs = True
End Sub

 

[hsayar]

Yukarıdaki kodlar bütün tablarımı gizliyor, yoksa gizlenecek her sayfa için ayrı ayrımı çalıştırılııyor

peki günlük (veri Giriş sayfasında satır sütun silme işlemleri nasıl engellenecek ?