Hiding specific column on all worksheets
Sub Macro2()
Sheets(Array("Sheet1", "Sheet2", "Sheet3")).Select
Columns("A:A").Hidden = True
Sheets("Sheet1").Select
End Sub
--
HTH
RP
(remove nothere from the email address if mailing direct)
"Scott Steiner" wrote in message
...
Hi,
I want to hide column A of all my worksheets. When I do this by hand
then everything is ok i.e. I select all worksheets and hide column A. So
I recorded a macro with these steps, here's the produced code:
Sub Macro2()
Sheets(Array("Sheet1", "Sheet2", "Sheet3")).Select
Sheets("Sheet1").Activate
Columns("A:A").Select
Selection.EntireColumn.Hidden = True
Sheets("Sheet1").Select
End Sub
However, when I now run the above macro, only column A of the first
sheet is hidden. What is wrong with the code?
Thanks.
|