Merhaba Userformda arama butonuna tıklayarak yazdığım ID numasına ait kaydı silmek istediğimde Range Sınıfının Delete Yöntemi Başarısız Hatası alıyorum. Aynı kod başka bir
Excel projemde hatasız çalışıyor. Bu sorunu nasıl halledebilirim. Teşekkürler
sayfanız şifre korumalı işlem yapmadan önce onu kaldırıp dener misiniz?
Sn.Berduş
ThisWorkbook.Worksheets("Ana_Sayfa").Unprotect "171717" ile
ThisWorkbook.Worksheets("Ana_Sayfa").Protect "171717" Sayfa koruma ve koruma kaldırma kodlarını yazmayı unutmuşum. Teşekkür ederim.
sayfayı şifrelerken sadece kullanıcı arayüzü seçeneğini aktifleştirirseniz galiba sadece doğrudan sayfa üzerinde işlem yapılması engelleniyor, macro ve yordamlarda sorun çıkmıyor
kitap açılma olayına/Workbook_Open olayına
Sheet1.Protect Password:="şifre", UserInterfaceOnly:=True
kodunu ekleyip dener misiniz?
bu işlem tüm şifreli sayfalar için yapılacak
Not: Test etmedim sadece tahmin
bu kod tüm sayfaları şifreler siz istediğiniz sayfaları şifrelersiniz
Private Sub Workbook_Open()
For a = 1 To Sheets.Count
ThisWorkbook.Worksheets(a).Unprotect "171717"
ThisWorkbook.Worksheets(a).Protect Password:="171717", UserInterfaceOnly:=True
Next
End Sub
Berduş hocam bu 4.mesajdaki kod hata verdi.