Password??

Posted by mike on August 09, 2000 6:25 AM

How do you make the ***** appear instead of the actual password when you enter a password

THIS IS MY MACRO:

Sub deletedata()
varanswer = InputBox("Please enter Password?", "Security Check - Case Sensative")
If varanswer = "urf" Then
Call delete
Else
MsgBox ("You are not authorized to access this function.")
End If
End Sub

Posted by Ryan on August 09, 0100 1:16 PM

Mike,

You can set up a little userform with a text box on it. The textbox has a property called PasswordChar that you can set to "*" or whatever other character you would like. This will fix you problem.

Ryan