View Single Post
  #5   Report Post  
Michael Link
 
Posts: n/a
Default

As Mr. Burns would say, EXCELLENT! This will be very helpful. Thank you so
much!

"Hayeso" wrote:

Right Click the Sheet tab and select "View Code" then add
the following code. You can change the password to whatever you like.


Private Const Password As String = "DoubleOhSeven"

Private Sub Worksheet_Activate()
Me.Visible = False
If InputBox("Please Enter the Password for the " & Me.Name & " Sheet",
"Enter Password") < Password Then
Me.Visible = False
Else
Me.Visible = True
End If
End Sub


"Michael Link" wrote:

Is it possible to protect a sheet in a workbook so that it isn't even
viewable unless you have the password? One of the sheets in my workbook
contaiins highly sensitive information that I don't want most folks to see,
but I want users to be continue to hide and unhide other elements in the
workbook to fit their needs.

Is there something I can write in VBA that will do the trick? In the perfect
world, what would happen is that, when a user clicked on the tab for the
Sensitive Sheet, a popup box would appear asking for a password. Is this even
possible?

Help! Any answers would be much appreciated.

Cheers!