Sub gsnu()
Dim w As Worksheet
For Each w In Worksheets
w.Activate
Columns("C:E").Select
Selection.EntireColumn.Hidden = True
Next
End Sub

--
Gary''s Student


"T De Villiers" wrote:


The following is meant to hide columns c-e in each worksheet in a
workbook.
Not quite working as it doesnt operate for each and every worksheet

Thanks in advance


Sub hidecols()
Dim sh As Worksheet


For Each sh In ThisWorkbook.Worksheets
Columns("C:E").Hidden = True
Next
End Sub


--
T De Villiers
------------------------------------------------------------------------
T De Villiers's Profile: http://www.excelforum.com/member.php...o&userid=26479
View this thread: http://www.excelforum.com/showthread...hreadid=532226