make the characters in password entry "*"

[rav_x06]

Hi, I have a button on a sheet on that button this code:

On Error Resume Next
Password = InputBox("Type password", "Password Entry", vbOKCancel)
If Password = "password2" Then
Sheet8.Visible = xlSheetVisible
Sheets("Sales person 2").Select
Else
Sheet8.Visible = xlSheetHidden
If Password <> "password" Or Password = "" Then
MsgBox ("Entered password was incorrect or was not entered")
End If
End If

but when the user enters the password comes as the letters I want to chnage that to the * so the password entry would be hidden.


Thanks

[Bob Phillips]

I would suggest you build a custom form and use a textbox there. That has a paswword char property that you can set to * so the letter doesn't echo back.