Office: Blattschutz Userform / Comman Button

Hallo zusammen,
da ich mit VBA noch nicht wirklich die Ahnung habe beiße ich mir momentan wieder etwas die Zähne aus.
Ich habe in meiner Excel Tabelle einen Command Button der eine Eingabemaske öffnet.
Das funktioniert auch problemlos.
Nun zu meinem Problem.

Die Tabelle ist beim öffnen immer mit einem Passwort geschützt.
Wenn nun der Button gedrückt wird wird das Passwort aufgehoben und man kann die Eingabe tätigen und speichern.
Beim Beenden wird dann der Passwortschutz wieder aktiviert.
Klickt man nun erneut den Button öffnet sich die Eingabemaske wieder normale aber beim schließen muss man das Passwort nun mit der Hand eintragen.

Die Formel die ich hinterlegt habe sieht folgendermaßen aus:

Sub Eintrag_erstellen()
Eingabemaske.Show
If ActiveSheet.Protect = True Then
ActiveSheet.Unprotect "Passwort"
End If
If ActiveSheet.Unprotect = True Then
ActiveSheet.Protect "Passwort"
End If
End Sub

Wie kann man das am besten umgehen?
Vielen Dank im Voraus für Eure Hilfe :-)

Gruß
Madspawn

 

Ich habe das Problem nun doch lösen können :-)