Macro hide columns into several sheets?

[patrick89]

Hi all!

I m intern and I need juste a piece of your experience to make it working...!

To sum up, I'd like to hide a column (D to F for instance) on several sheets. (sheets 1 to 5)
I tried almost all the possibilities thanks to VBA online but I m really novice and nothing s working so far...

(for example 1 of the code I tried but not working:
Sub Macro20()
'
' Macro20 Macro
'
'
Sheets(Array("Sheet1", "Sheet2", "Sheet3", "Sheet4", "Sheet5")).Select
Sheets("Sheet5").Activate
Columns("D:F").Select
Selection.EntireColumn.Hidden = True
End Sub)

Thanks a loooot for your help and hope I made it clear..

Patrick

 

[BobUmlas]

Sub Macro20()
For Each x In Array("Sheet1", "Sheet2", "Sheet3", "Sheet4", "Sheet5")
Sheets(x).Columns("D:F").EntireColumn.Hidden = True
Next
End Sub

 

[patrick89]

Thanks a looooooott!

awesome