Sayın arkadaşlar. Makro güvenlik Seviyesi düşük iken dosyanın açılmasını engelleme konusunda oldukça uzun araştırma yaptım. Bu konuda etkili bir kod bulamadım. Ancak IsAddin ile bir uygulama yapılabileceği belirtilmekle birlikte verilen kodları uygulayarak dosyayı "Makro Güvenlik Seviyesi" düşük değil iken açmak istediğimde dosya açılıyor. Ayrıca bu kodlar ile dosyayı kaydederken .xla uzantılı olacak şekilde Farklı Kaydet'e yönlendiriyor.
Aradığımı şu şekilde özetleyebilirim : Dosya kapanırken dosyayı makro güvenlik seviyesinin düşük olmasına göre bir şekilde kilitleyecek. Dosya makro güvenlik seviyesi düşük değil ise açılmayacak, makro güvenlik seviyesi düşük ise açılacak.
http://www.excel.web.tr/f48/makrolary-etkinle-tir-devre-dy-y-byrak-problemi-t23194.html
Private Sub Workbook_Open()
ThisWorkbook.IsAddin = False
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.IsAddin = True
End Sub
Aradığımı şu şekilde özetleyebilirim : Dosya kapanırken dosyayı makro güvenlik seviyesinin düşük olmasına göre bir şekilde kilitleyecek. Dosya makro güvenlik seviyesi düşük değil ise açılmayacak, makro güvenlik seviyesi düşük ise açılacak.
http://www.excel.web.tr/f48/makrolary-etkinle-tir-devre-dy-y-byrak-problemi-t23194.html
Private Sub Workbook_Open()
ThisWorkbook.IsAddin = False
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.IsAddin = True
End Sub
Ekli dosyalar
Son düzenleme:
