hide/unhide row macro

  • Thread starter Thread starter Checkman
  • Start date Start date
C

Checkman

I'm new to writing macros and need a little help. I'm trying to write
macro that will hide/unhide different rows within a worksheet. Fo
example, I want to check a box and be able to hide rows 8, 10 and 12
but leave rows 9 and 11 alone. Thanks in advance for your help
 
Put a checkbox from the forms toolbar (not the control toolbox toolbar) on a
worksheet.

Assign it this macro:

Option Explicit
Sub testme()

Dim myRng As Range
Dim myCBX As CheckBox

Set myCBX = ActiveSheet.CheckBoxes(Application.Caller)

Set myRng = ActiveSheet.Range("a8,a10,a12")

' If myCBX.Value = xlOn Then
' myRng.EntireRow.Hidden = True
' Else
' myRng.EntireRow.Hidden = False
' End If

myRng.EntireRow.Hidden = myCBX.Value

End Sub

The commented lines may be easier to understand, but they're equivalent to the
last line.
 
try
Sub ToggleHideColumns()

'Range("a1,c1,g1").EntireColumn.Hidden = Not
Range("a1,c1,g1").EntireColumn.Hidden
Range("a2,a4,a8").EntireRow.Hidden = Not Range("a2,a4,a8").EntireRow.Hidden
End Sub
 
glad to help. you may have to correct the word wrap if you want to use the
column one
 
Back
Top