How to unhide all rows and columns with a few exeptions?

[Fabulist]

Hello everyone,

How can I make this module:


Sub UnhideAll()
Columns.EntireColumn.Hidden = False
Rows.EntireRow.Hidden = False
End Sub

Work on all sheets and not only on the one I am viewing? Is there another way?

Also, is it possible to exempt specific columns & rows on specific sheets?

Thank you in advance!

 

[mohan.r1980]

Try this

Sub UnhideAll()
for i=1 to worksheets.count 
     cells.select
     Columns.EntireColumn.Hidden = False
     Rows.EntireRow.Hidden = False
next i
End Sub

 

[Fabulist]

Thanks, but it only works on the sheet viewed, like the macro I posted.

 

[My Aswer Is This]

Try this:

Sub Unhide_All()
Dim i As Long
Application.ScreenUpdating = False
    For i = 1 To Sheets.Count
        Sheets(i).Rows.Hidden = False
        Sheets(i).Columns.Hidden = False
    Next
Application.ScreenUpdating = True
End Sub

 

[mohan.r1980]

Paste the below code in this workbook

Sub worksheet_Open()
For i = 1 To Worksheets.Count
     Cells.Select
     Columns.EntireColumn.Hidden = False
     Rows.EntireRow.Hidden = False
Next i
End Sub

 

[Fabulist]

Thank you both for your time, your code worked My Answer Is This, Application.ScreenUpdating is also a very useful command I did not know about, which is great to know.

Is there a way to add exclusions for specific rows / columns as well?

 

[My Aswer Is This]

You said:
"Is there a way to add exclusions for specific rows / columns as well?"

Anything is possible. What did you have in mind.

 

[Fabulist]

Well I have some macros that hide multiple rows and columns. I would like that when I use your macro to unhide everything, some special rows and columns will remain hidden as specified. I have absolutely no idea what to do for this.

 

[My Aswer Is This]

You need to tell me which sheets which rows and which columns need to be hidden.

 

[Fabulist]

You need to tell me which sheets which rows and which columns need to be hidden.

Sorry, I thought I could do this myself to edit it in the future, is it that complicated?

For example, I need Row 35, 93 and column C to remain hidden on Sheet 6.