Hidden sheets

[Heera]

Hi,

I want a macro which should run a procedure if a sheet is hidden(not
visiable).
(My workbook is password protected)

I want a code which will identify the sheet is hidden or not. Here is my
code but is is not working.

If Sheets("Letter Audit Sheet").Hidden = True Then
Activecell.value=1520
Exit Sub
End if

Please help

 

[Mike H]

Hi,

Try this

If Sheets("Letter Audit Sheet").Visible = True Then
ActiveCell.Value = 1520
Exit Sub
End If

Mike

 

[Heera]

hey it worked out....

thanks for your support.