View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Gary''s Student Gary''s Student is offline
external usenet poster
 
Posts: 11,058
Default For each sheet in workbook

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