cancel button in info box
16.04.2020 22:36:13
Cordt-Erik
Vllt könnt ihr mir helfen?
Ich habe auf einem Arbeitsblatt (ABC) einen Button, der über ein Makro bei dem Arbeitsblatt (XYZ) das Passwort über eine Dialogbox aufheben soll.
Bei richtigem Passwort + OK wird das Arbeitsblatt XYZ aktiviert
Bei falschem Passwort + OK passiert gar nichts und das Arbeitsblatt ABC bleibt aktiv
Soweit so gut, nur wenn der Nutzer "cancel" drückt aktiviert sich das Arbeitsblatt XYZ obwohl ABC aktiv bleiben sollte. Mein bescheidener code:
Sub Makro1()
' Wird durch button vom worksheet ABC gesteuert
On Error GoTo Fehler
' Wenn falsches oder gar kein Passwort eingegeben wurde
Worksheets("XYZ").Unprotect
Worksheets("XYZ").Activate
Exit Sub
Fehler:
Worksheets("ABC").Select
End Sub
Habt Ihr eine Lösung, wie mit der Schaltfläche Cancel umgegangen wird, sodas das geschützte Arbeitsblatt gar nicht erst selektiert/aktiviert wird?
Ganz Vielen Dank und alles Gute.
CE