Jim,

I have the following macro that I use to unhide the hidden worksheets in my
workbook:

Dim wkSht As Worksheet
For Each wkSht In ActiveWorkbook.Worksheets
With wkSht
If .Visible = False Then
..Visible = True
End If
End With
Next wkSht
End Sub

From your previous recommendation, I have now changed some of the properties
of some of the worksheets in my workbook from 'Hidden' to 'VeryHidden'. What
I would like to do is create a macro or modify the above macro to change the
properties of the 'VeryHidden worksheets in my workbook to 'Visible'
worksheets.

Thanks for your patience. Dave




"Jim Thomlinson" wrote:

Since you have not specified which sheets or such I will have to be very
general. You can use code such as
Sheet1.Visible = xlsheetveryhidden
which refers dirctly to the sheet object using it's code name
or
Sheets("MyTabName").Visible = xlSheetVisible
Which refers to the sheet by tab name.
--
HTH...

Jim Thomlinson


"DBavirsha" wrote:

I should have specified that I run macros on the workbook while I am
modifying it in the unprotected and unshared mode. Once I complete the
changes to the workkbook I protect and share the workbook which, I agree,
disables the macros.

Thanks again, Dave

"Jim Thomlinson" wrote:

Shared workbooks and macros genearlly do not get along. Sharing is a type of
protection that locks out certain functionallity. With the functionallity
locked out the macros can not manipulate those settings. I beleive that sheet
visibility is one of those settings so you are out of luck.
--
HTH...

Jim Thomlinson


"DBavirsha" wrote:

I maintain a workbook that contains several hidden worksheets, some unhidden
worksheets, and this workbook is password protected and shared. I do not
want the users to have the ability to unhide the hidden worksheets in my
workbook.

Since I hide and unhide different worksheets in the workbook every week, I
would like to use a macro to toggle between the €˜SheetVeryHidden property
and the €˜SheetVisible property.

Thanks for the help