Solved: Show asterisk(****) in password VBA code

[Victor]

Hi all:

Is it possible to show asterisk (*****) in the password VBA code below?

Is so, how?

Thanks for the help

Victor


Sub LaunchFindDialog()
Password = Application.InputBox(prompt:="Enter Password", Title:="Password", Type:=1 + 2)
If Password = "LL1234" Then
On Error GoTo Finish
'Sheets("A").Activate
Application.CommandBars("Edit").Controls("Find...").Execute
Finish:
End If
End Sub

[Bob Phillips]

You need to use a custom userform with a textbox, which has a PasswordChar property.