Ist das VBA-Projekt geschützt

Funktion

Diese Funktion prüft, ob das VBA-Projekt (durch ein Passwort) geschützt ist.

Code

Public Function IstProjektGeschützt() As Boolean


  IstProjektGeschützt = CBool(Application.VBE.ActiveVBProject.Protection)


End Function

Beschreibung

Es wird die Eigenschaft "Protection" des VBA-Projektes abgerufen.

Verweise

Damit dieser Code funktioniert, ist folgender Verweis erforderlich:

• Microsoft Visual Basic for Applications Extensibility 5.3