hiding sheet --authorised use only

[arjaffari]

is there any way so the sheets may be hidden for any unauthorized use and may only be viewable by authorized persons

 

[Stormseed]

is there any way so the sheets may be hidden for any unauthorized use and may only be viewable by authorized persons

I think this is the same question you asked one more time.

Follow these steps:

Excel menubar --> click on Format --> Sheet --> Hide. Next, protect your worksheet with a password. This will help you to accomplish your question requirement.

In order to protect your worksheet with a password:

Excel Menubar --> Click on Tools --> Protection --> Protect Sheet --> Apply Password and you are done.

 

[soodaarti21]

the process has only one problem when the application is distributed and we dont want everybody to see or access the hidden sheets except from the autorised person.

In this case is there a way out???

 

[AlexM]

You can unhide sheets using a macro, which could be executed only by authorised person.

 

[mikerickson]

something like this in the ThisWorkbook module might work.

Dim LastSheet as Worksheet

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
    Dim showSheet As Worksheet
    If Sh.Name = "SecretSheet" Then
        Application.EnableEvents = False
        lastSheet.Activate
        Set showSheet = IIf(Application.InputBox("What is the password", Type:=2) = "password", Sh, lastSheet)
        showSheet.Activate
        Application.EnableEvents = True
    End If
End Sub

Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
    Set lastSheet = Sh
End Sub