- Katılım
- 2 Temmuz 2009
- Mesajlar
- 542
- Excel Vers. ve Dili
- office 2019 Türkçe
- Altın Üyelik Bitiş Tarihi
- 28/12/2022
değerli üstadlarım, konuyu araştırdım ama soruna çözüm bulamadım. çalışma kitabında bazı sayfaların silinmesi nasıl engellenebilir. belki de excel versiyonumdan dolayı çalışma kitabını koru ile yapamadım. şöyle bir kod buldum ama bu kodları bir kez kullanınca (dosyayı kapatınca bile) bundan sonra hiçbir zaman silmeye izin vermiyor :
teşekkürler...
Kod:
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