With Worksheets("Sheet1").Columns("A")
.Hidden = Not .Hidden
End With

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Ron de Bruin" wrote in message
...
Hi Patrick

Sheets("sheet1").Columns("A:C").EntireColumn.Hidde n = True

False to get them back

--
Regards Ron de Bruin
http://www.rondebruin.nl


"Patrick" wrote in message
...
How do i hide and unhide a column using VBA
Thanks

--
Patrick