Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Code to show/hide sheet to asterisk the password
Hello all
I need some help with some code. I found the follwoing code on the web and thank you to the author it works well, but there is a problem in that it shows the password as you type it in, increasing the risk of people breaking the code. Is there a way that the input in the password box can be asterisk out and not shown as the user is typing it in Const pWord = "password" Sub HideSheets() 'Set worksheet to Very Hidden so that it can only be unhidden by a macro Worksheets("Salary").Visible = xlSheetVeryHidden End Sub Sub ShowSheets() 'Prompt the user for a password and unhide the worksheet if correct Select Case InputBox("Please enter the password to unhide the sheet", _ "Enter Password") Case Is = pWord With Worksheets("Salary") .Visible = xlSheetVisible .Activate .Range("A1").Select End With Case Else MsgBox "Sorry, that password is incorrect!", _ vbCritical + vbOKOnly, "You are not authorized!" End Select End Sub Thanks Regards |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
how do i put an asterisk on a bar chart to show significance | Charts and Charting in Excel | |||
How Do I Password Hide a Sheet | Excel Programming | |||
How Do I Password Hide a Sheet | Excel Programming | |||
automatically hide row if cell contains asterisk | Excel Discussion (Misc queries) | |||
Show/hide cells code | Excel Programming |