Mit Eurer Hilfe konnte ich die unten beschriebene Passwortabfrage erstellen.
Nun habe ich noch eine kleine Frage:
Das Passwort soll beim Eingeben nur als **** (Sternchen) sichtbar sein.
Würde mich freuen wenn Ihr mir sagen könnt wie der VBA Text dann aussehen muss.
Vielen Dank im Vorraus
Michael
Private Sub CommandButton1_Click()
Dim sWord As String
Do While InputBox("Dieser Bereich ist nur für Insider !", "Achtung", "Bitte Passwort eingeben") <> "3411"
Beep
If MsgBox("Only for Insider !", vbOKCancel) = vbCancel Then End
Loop
Sheets("Buhrs").Visible = True
Sheets("Buhrs").Select
End Sub