başka kullanıcılarca excel açılışta makrolar etkinleştirilmeden açılmasın

[acemituncay]

diyelimki içinde makrolar olan bir çalışma kitabımız var bu kitabı başka kullanıcılar açarken ilk açılışta makrolar etkinleştirilmeden çalışma kitabı açılmasın istiyorum
ustalara saygılarımla lütfen yardımlarınızı bekliyorum.
cevap detaylı olursa sevinirim. acemiyimde

 

[leumruk]

Bunun için makro yazmak gerekiyor. Makro etkinleştirilemeyeceği için açılışı engelleme şansımız da kalmıyor.
Bu konuyu daha önce çok araştırdığım için bu kadar emin konuşuyorum: Böyle bir şey maalesef olmuyor.

 

[acemituncay]

teşekkür ederim

 

[uzmanamele]

merhaba

ek dosya işinizi görür mü?

Private Sub Workbook_Activate()
Sheets("anasayfa").Select
End Sub

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    On Error Resume Next
Application.ScreenUpdating = False
Dim i As Integer
Sheets("anasayfa").Move Before:=Sheets(1)
For i = 2 To Worksheets.Count
ThisWorkbook.Sheets(i).Visible = xlSheetVeryHidden
Next i
End Sub

Private Sub Worksheet_Activate()
ActiveSheet.Name = "anasayfa"
End Sub
Private Sub Worksheet_Deactivate()
If Me.Name <> anasayfa Then
Me.Name = "anasayfa"
End If
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    On Error Resume Next
Application.ScreenUpdating = False
Dim i As Integer
Sheets("anasayfa").Move Before:=Sheets(1)
For i = 2 To Worksheets.Count
ThisWorkbook.Sheets(i).Visible = xlSheetVisible
Next i
End Sub

 

[batugul35]

çalıştırınca
compile error in hidden module:sheet1
diye bir hata veriyor.