Invisible sheets

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

emilh - 20 May 2008 07:08 GMT

Hi.

I have received an excel file with vba and it has the code which prevents
the file to display most sheets. Is there any way (user level) other than
deleting or commenting that section of code to display the sheets?

Thank you.

Signature

Emil

Reply to this Message

steonken@web.de - 20 May 2008 08:27 GMT

hi Emil,
that depends on how the sheets are hidden (hidden or veryhidden).
if only hidden, try Format/Sheet/Unhide
if veryhidden, you can open the VBA editor and change the visible-
option of a sheet from veryhidden to visible.

bye
stefan

> Hi.
>
[quoted text clipped - 5 lines]
> --
> Emil

Reply to this Message

emilh - 20 May 2008 08:36 GMT

Thanks stefan.

it's 'xlSheetVeryHidden'

it seems that the only way is change the code each time i want to access the
data in those sheets?

Signature

Emil

> hi Emil,
> that depends on how the sheets are hidden (hidden or veryhidden).
[quoted text clipped - 14 lines]
> > --
> > Emil

Reply to this Message

Norman Jones - 20 May 2008 08:55 GMT

Hi Emil,

Try pating the following code into a
standard module:

'==========>>
Public Sub Tester()
Dim WB As Workbook
Dim SH As Worksheet

Set WB = ActiveWorkbook
For Each SH In WB.Worksheets
SH.Visible = xlSheetVisible
Next SH
End Sub
'<<==========

Assign a shortcut key to the macro and
use the key combination to display all
sheets at any point

---
Regards.
Norman

> Thanks stefan.
>
[quoted text clipped - 24 lines]
>> > --
>> > Emil

Reply to this Message

Norman Jones - 20 May 2008 09:10 GMT

Hi Emilh,

If , however, the workbook might contain
non-worksheet sheets (a chart, for example),
try the following version:

'==========>>
Public Sub Tester()
Dim WB As Workbook
Dim SH As Object

Set WB = ActiveWorkbook
For Each SH In WB.Sheets
SH.Visible = xlSheetVisible
Next SH
End Sub
'<<==========

---
Regards.
Norman

Reply to this Message

steonken@web.de - 20 May 2008 09:53 GMT

hi Emil,
you can use code like Norman posted it.
if the sheets are hidden on opening the workbook (Workbook_Open
event), you can press the SHIFT key while opening (via file/open in
Excel).
Excel doesn´t start code in Workbook_Open then.

bye
stefan

> Thanks stefan.
>
[quoted text clipped - 5 lines]
> --
> Emil

Reply to this Message

emilh - 20 May 2008 10:57 GMT

Thank you very much guys. Shift didn't work. I'll try Norman's code

Signature

Emil

> hi Emil,
> you can use code like Norman posted it.
[quoted text clipped - 15 lines]
> > --
> > Emil

Reply to this Message