Carey,
If you want a more flexible way:

Dim WS As Worksheet
Const SheetsToWorkOn As String = "Sheet2,Sheet3"

'For Each WS In Worksheets(Array("Sheet2", "Sheet3"))
'Or
For Each WS In Worksheets(Split(SheetsToWorkOn, ","))
WS.Columns("A:E").EntireColumn.Hidden = False
Next

NickHK

"Carey N." wrote in message
news:n_qEg.20498$yE1.5567@trndny02...
Keeping in mind that I know next to nothing about coding, the following is
what appeared after using the macro recorder to unhide columns on multiple
sheets in an Excel workbook.(Same thing has occurred in Excel 97 and Excel
2002.)

Sheets(Array("Sheet1", "Sheet2", "Sheet3")).Select
Sheets("Sheet1").Activate
Columns("A:E").Select
Selection.EntireColumn.Hidden = False

After I re-hide the columns and tried to use the macro, only the columns
on
the first sheet were unhidden.

Is there a shorter or more precise way to make this work on all three
sheets
from a macro, without having to select each individual sheet(and will it
also work for re-hiding the columns), as below:

Sheets("Sheet1").Activate
Columns("A:E").Select
Selection.EntireColumn.Hidden = False
Sheets("Sheet2").Activate
Columns("A:E").Select
Selection.EntireColumn.Hidden = False
Sheets("Sheet3").Activate
Columns("A:E").Select
Selection.EntireColumn.Hidden = False

Any help greatfully accepted.
--
Carey in MA