ich suche nach einer Möglichkeit, dass immer dann, wenn eine Excel-Datei (und zwar egal welche) geöffnet wird, auf das geöffnete Arbeitsblatt ein Blattschutz angewendet wird.
Dafür habe ich in der Personal.xlsb unter "Diese Arbeitsmappe" folgenden Code eingegeben:
Private Sub Workbook_Open()
Call Autoschutz
End Sub
Das Makro "Autoschutz" in der Personal.xlsb lautet dann:Sub Autoschutz()
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub
Wenn ich nun per Doppelklick eine Excel-Datei öffne, scheint das Problem zu sein, dass das Makro "Autoschutz" ausgeführt wird, bevor die Excel-Datei überhaupt geöffnet ist und es kommt die Fehlermeldung: Laufzeitfehler '91': Objektvariable oder With-Blockvariable nicht festgelegt.
Weiß einer von euch, wie man die Ausführung des Auto-Makros "verzögern" kann, bis überhaupt eine Excel-Datei geladen ist?
Danke und liebe Grüße,
Johannes