View Single Post
  #1  
Old February 21st, 2007, 06:31 PM posted to microsoft.public.excel.worksheet.functions
Scafidel
external usenet poster
 
Posts: 35
Default ActiveX Toggle Workbook

OK. I am using this command to hide/unhide several rows of a sheet that have
nonessential information. As my workbook has many sheets, I would like to be
able to Hide/Unhide rows on ALL the sheets. I know I can copy the command for
each sheet, but there must be an easier way. If possible, by having a "cover
sheet" with a toggle to hide/unhide rows for the entire workbook. If not, is
there a way to include all sheets in the command?

Private Sub ToggleButton1_Click()
With Worksheets("34-01").Rows("45:200")
If .Hidden = True Then
.Hidden = False
Else
.Hidden = True
End If
End With
End Sub

Thanks
Scafidel