Unhiding rows across worksheets at once

[nmdks3]

I am trying to unhide a range of rows across several worksheets in the same book at once. Here is the code I have:

Sheets(Array("AUG", "SEP", "OCT", "Q1", "NOV", "DEC", "JAN", "Q2", "FALL", "FALL2")).Select
Sheets("AUG").Activate

' Show regular departments
Range("9:30,222:247").Select
Range("A9").Activate
Selection.EntireRow.Hidden = False

Currently, it is only unhiding the rows on the "AUG" tab. Any suggestions? All help is appreciated!

 

[nmdks3]

I think Peter dropped a property:

ws.Rows("32:59,249:281,435:435").EntireRow.Hidden = False

Nope, that wasn't it.

 

[VoG]

Try

Sub testb()
Dim ws As Worksheet
For Each ws In Sheets(Array("AUG", "SEP", "OCT", "Q1", "NOV", "DEC", "JAN", "Q2", "FALL", "FALL2"))
    ws.Range("A32:A59,A249:A281,A435").EntireRow.Hidden = False
Next ws
End Sub

 

[nmdks3]

That did not unhide the range of rows on any of the sheets.

 

[nmdks3]

That did not unhide the range of rows on any of the sheets.

If it helps, running Excel 2003 SP3

 

[VoG]

Works here.

 

[JoeMo]

I think the problem is trying to unhide multiple noncontiguous rows in one shot. Try this:

For Each ws In Sheets(Array("AUG", "SEP", "OCT", "Q1", "NOV", "DEC", "JAN", "Q2", "FALL", "FALL2"))
    ws.Rows("32:59").EntireRow.Hidden = False
    ws.Rows("next group here").EntireRow.Hidden = False
    ws.Rows("next group here").EntireRow.Hidden = False

Next ws

 

[Nalani]

Worked for me too.

Possiblities:

1. You didn't have any rows hidden before running the code, so it appeared as not to work.

2. You do not have the exact Array of sheets (all 9 and spelled exact) as is what is in the Array code line. In which case you would get an Subscript out of range Error.

 

[Nalani]

I think the problem is trying to unhide multiple noncontiguous rows in one shot. Try this:

I just tested with Eight groups and 3 single rows. Worked just fine the way Peter had it written.

Which brings us back to post # 17

 

[JoeMo]

Peter's sub using Range("list multiple A ranges here").entirerow.hidden
works for me, but I can't use Rows("list multiple rows here") with multiple, noncontiguous rows. The latter generates a type mismatch error.

 

[nmdks3]

Worked for me too.

Possiblities:

1. You didn't have any rows hidden before running the code, so it appeared as not to work.

2. You do not have the exact Array of sheets (all 9 and spelled exact) as is what is in the Array code line. In which case you would get an Subscript out of range Error.

1. The rows are hidden before running the code. I check each time to make sure.

2. The array of sheets are named exactly as was shown.