224 Aufrufe
Gefragt in Tabellenkalkulation von drmojo Einsteiger_in (86 Punkte)
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

2 Antworten

0 Punkte
Beantwortet von m-o Profi (18.3k Punkte)

Hallo Klaus,

mach eine Privat Sub daraus:

Private Sub Workbook_Open()
Gruß
M.O.
0 Punkte
Beantwortet von drmojo Einsteiger_in (86 Punkte)
Hallo M.O.
recht vielen Dank, jetzt ist es genau so wie es sein soll.
Gruß

klaus
...