Inputbox Schriftart oder Farbe verändern
28.08.2008 15:32:00
Gunter
ich habe eine Inputbox, über die eine Passwortabfrage gesteuert wird. Leider ist das Passwort im Eingabefeld zu sehen. Ist es möglich den Text z.B. in der Schriftart "Wingdings" zu formatieren, oder
die Schriftfarbe in weiss, damit das Passwort nicht mehr zu sehen ist?
Private Sub DF_Click()
Dim Passwort As String
Passwort = InputBox("Geben Sie das Paßwort an: ")
'Passwort lautet XXX
If Passwort = "XXX" Then
Sheets("DF").Visible = True
Sheets("DF").Select
Else
MsgBox ("Passwort Falsch")
Exit Sub
End If
End Sub
Vielen Dank im voraus.
Gruß Gunter
