hiding a tab and password protecting it

[bionicle]

hi all,

as the per the title, is there a way that an individual tab can be hidden and can not be viewed without a password?

 

[nemmi69]

Try

Option Explicit


Sub HideAndProtect()
    Sheets("Sheet2").Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
    Sheets("Sheet2").Visible = False
    ActiveWorkbook.Protect Structure:=True, Windows:=False, Password:="password"
End Sub
Sub Unhide()
    ActiveWorkbook.Unprotect Password:="password"
    Sheets("Sheet1").Select
    Sheets("Sheet2").Visible = True
End Sub