Code für Makro deaktivieren funzt nur manchmal
01.03.2005 12:22:21
Merten
habe mit Hilfe des Forums folgenden VBA Befehl, welcher bewirkt, dass wenn ein Nutzer die Makroabfrage deaktiviert (beim laden der tabelle) nur ein Tabelleblatt "Makros aus" angezeigt bekommt.
Jedoch funzt dieser Befehl nur manchmal, woarn kann das liegen. Weiß jemand Abhilfe.
In diese Arbeitsmappe:
Private Sub Workbook_Open()
Application.ScreenUpdating = False
Worksheets("One_Pager").Visible = True
Worksheets("Input").Visible = True
Worksheets("Makros aus").Visible = xlVeryHidden
Sheets("One_Pager").Select
Range("D11").Select
Application.ScreenUpdating = True
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.ScreenUpdating = False
Worksheets("Makros aus").Visible = True
Worksheets("One_Pager").Visible = xlVeryHidden
Worksheets("Input").Visible = xlVeryHidden
Sheets("Makros aus").Select
Range("A1").Select
Application.ScreenUpdating = True
End Sub
Danke im voraus.
merten