622 Aufrufe
in Tabellenkalkulation von drmojo Einsteiger_in (96 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
von m-o Profi (22.9k Punkte)

Hallo Klaus,

mach eine Privat Sub daraus:

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

klaus

Deine Antwort

Dein angezeigter Name (optional):
Datenschutz: Deine Email-Adresse benutzen wir ausschließlich, um dir Benachrichtigungen zu schicken. Es gilt unsere Datenschutzerklärung.
Anti-Spam-Captcha:
Bitte logge dich ein oder melde dich neu an, um das Anti-Spam-Captcha zu vermeiden.
...