ich habe eine Prozedur, die im Aktiven Workbook einen Code in ein die VBA Umgebung eines Worksheets packen soll. Wen das Ziel (Aktive) Workbook einen VBA Projektschutz hat, soll eine Meldung kommen, daß diese Aktion nicht ausgeführt werden kann.
Dafür habe ich die Zeile:
ActiveWorkbook.VBProject.Protection = vbext_pp_locked
in eine IF Prüfung eingesetzt.
Aber nun wird ein Fehler verursacht: vbext_pp_locked => Variable ist nicht definiert. Aber es ist doch keine Variable?! Wenn ich die Codezeile Wort für Wort schreibe und dann nach "Protection" auf die Leertaste drücke, dann gibt er als Option ja "=vbext_pp_locked" an.
Was ist zu tun?
Dank und Gruß, Andreas
PS: OK, ich könnte auch über ein ErrorHandling eine Lösung herbeiführen. Aber es ist ein m.E. nach unlogischer Fehler. Oder muß ich in meinen VBA Optionen eine Einstellung verändern?