Perhaps try copying this alteration of JE's code:

Public Sub Hide()
Range("M:O,X:Z,AI:AK,AT:AV," & _
"BE:BG,BP:BR,CA:CC," & _
"CF:CF,CM:CM,CR:CR") _
.EntireColumn.Hidden = True
End Sub

Paste that in a general module, not a module associated with the worksheet,
then try running it.

It worked fine for me.

--
Regards,
tom Ogilvy


"Tom Ogilvy" wrote in message
...
It should work in all versions with VBA (xl5 and later).

--
Regards,
Tom Ogilvy

"sonar " wrote in message
...
Hi, I am using Excell 2000, would that work on that version?


---
Message posted from http://www.ExcelForum.com/