Wie verhindere ich die Anzeige des Makros Sub Workbook_Open() ?

Question

Guten Morgen,

Ich habe folgenden Code in die Arbeitsmappe eingetragen:

Sub Workbook_Open()
ActiveSheet.Protect userinterfaceonly:=True, Password:="PASSWORT"
' im geschützten Blatt arbeiten
ActiveSheet.EnableAutoFilter = True
End Sub

Das VBA-Projekt ist passwortgeschützt, so dass die in den Modulen enthaltenen Makros nicht angezeigt werden.
Um bei aktivem Blattschutz den Autofilter zu ermöglichen,  habe ich den o.a. Code in das Modul "diese Arbeitsmappe" eingetragen.

Im Menüpunkt "Makros" unter "Makros anzeigen" wird das Makro "DieseArbeitsmappe.Workbook_Open" angezeigt und nur der Button "Ausführen" angeboten.

Gibt es eine Möglichkeit, auch die Anzeige dieses Makros zu unterbinden?

Vielen Dank für einen Tipp.

LG

Klaus

Answer 1

Hallo Klaus,

mach eine Privat Sub daraus:

Private Sub Workbook_Open()

Gruß

M.O.

Answer 2

Hallo M.O.
recht vielen Dank, jetzt ist es genau so wie es sein soll.
Gruß

klaus