bahsettiğiniz talebinize yönelik olarak;
ilgili etiketin TIKLANDIĞINDA olay yordamı içerisine
Dim sifrenedir As String
sifrenedir = InputBox("Şifreyi giriniz", "ŞİFRE GİRİŞİ")
If sifrenedir = "deneme" Then
Me.AllowEdits = True
Else
Me.AllowEdits = False
Exit Sub
End If
yukarıdaki kodları ve KAYDET butonu içerisine deDoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
Me.AllowEdits = False
kodlarını yazınız.son olarak;naçizane bir de tavsiyede bulunmak isterim.
lütfen,uygulamalarınızda KATIŞTIRILMIŞ MAKRO kullanmak yerine OLAY YORDAM eklemek sureti ile kod yazmayı tercih ediniz ki aynı zamanda kod yazma üzerine gelişim elde edebilesiniz.
bilginize...iyi çalışmalar,saygılar.