HIDE all EXCEPT Macro

[joyousrob]

Hi guys,

Im trying to build a macro to hide all collums except some of them i.e. A,B,BB,AC etc. On all my worksheets, preferably without having to state the name of the worksheet on the macro, as they are many and with complicated names.
Any ideas ?

Thanks !

 

[Jonmo1]

Something like

Sub test()
For Each ws In Worksheets
    ws.Cells.EntireColumn.Hidden = True
    ws.Range("A:A, B:B, BB:BB, AC:AC").EntireColumn.Hidden = False
Next ws
End Sub

 

[joyousrob]

Worked like a charm, THanks!