Sayfa Silinmesini Engelleme

[idogus]

Herkeze selam!
Ne oldu bilmiyorum ama bir yerlerden indirdiğim örnek programlar yapmış olabilir. Çalışma sayfası ekleyebiliyorum ama silemiyorum.
Sil False durumda. Ne yapabilirim ?

Teşekürler !


Edit xxrt:"İmdat ! Sheetleri Silemiyorum !" Başlığınız,"Sayfa Silinmesini Engelleme" Olarak Değiştirildi..

 

[Serpily]

Bu durumda bir dosya gönderin de bakalım diyemeyeceğimize göre;

-"Kasayı gönderin de bakalım mı" diyeceğiz acep!!!

 

[abazya]

XP kullanıyorsa Kasa getirmesi gerekmez (bir yerlerden indirdiğim örnek programlar yapmış olabilir) Bir gün öcesine dönerse problem biter gibi

 

[akd]

merhaba sayın idogus
aşagıya yazacağım kodları boş bir sayfanın vbe sına yazın o sayfaya girin sonra diger silmek istediginiz sayfaya geçince sil olayı aktif olacaktır.
Private Sub Worksheet_Activate()
For Each Ctrl In Application.CommandBars.FindControls(ID:=847)
Ctrl.Enabled = False
Next Ctrl
End Sub

Private Sub Worksheet_Deactivate()
For Each Ctrl In Application.CommandBars.FindControls(ID:=847)
Ctrl.Enabled = True
Next Ctrl
End Sub
selamlar...

 

[idogus]

Teşekkürler