Makro mit PW Abfrage
31.07.2015 15:30:10
Peter
ich bin ein Anfänger und habe mich durch Foren gekämpft. Habe aber noch ein kleines Problem bei meinem Makro:
Ich habe hinter 4 Buttons jeweils ein Makro hinterlegt welches für eine benutzerdefinierte Ansicht ein Makro abfragt.
Wenn ich statt das PW einzugeben auf "abbrechen" drücke komme ich ebenfalls zu der Ansicht die _
durch ein PW gesperrt sein soll.
Option Explicit
Sub UserView_Peter()
Dim PW As String
PW = InputBox("Peter")
ActiveWorkbook.CustomViews("Peters Kalender").Show
If PW "DeinPasswort" Then Exit Sub
MsgBox "Makro wird fortgeführt."
End Sub
Finde leider meinen Fehler nicht.
Kann mir bitte jemand helfen?
Vielen Dank,
Gruss Peter.
Anzeige