View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
John John is offline
external usenet poster
 
Posts: 2,069
Default Replace password with *** in input box, xlVeryHidden

this site should point you in right direction:

http://www.xcelfiles.com/API_09.html
--
jb


"John" wrote:

Hi,
The following code works fine but the password "secret" is visible as I
type. How can I hide it? Can I hide it by putting a label or another box on
top of the password input box? I believe it is not possible to hide charters
inside an input box...

Private Sub CommandButton1_Click()
pwd = "secret"
i_pwd = InputBox("Please Enter Password to Unhide Sheet", "Unhide Sheet")
Select Case i_pwd
Case pwd
Worksheets("Sheet1").Visible = True
Worksheets("Sheet2").Visible = True
Worksheets("Sheet2").Activate
Case Else
MsgBox "Incorrect password; no action taken.", vbInformation, "Unhide
Sheet..."
End Select
End Sub
--
Thanks
John