Password

[Guest]

I have a button with a macro linked that Hide or Unhide other worksheets. I
like to protect that button with a password, then when the user clic the
button must have the password to go to the worksheet. Can you help me ?

Omar

 

[Harald Staff]

Hi Omar

Sub test()
Dim PW As String
PW = InputBox("Password:")
Select Case PW
Case ""
Case "PWD"
'your code here, instead of
MsgBox "You da man"
Case Else
MsgBox "Wrong password"
End Select
End Sub

See
http://www.dicks-blog.com/excel/2004/05/password_charac.html
or
http://www.xcelfiles.com/API_09.html
if you need to mask the entries.

HTH. Best wishes Harald