Met check box regels verbergen

[H.Weenink]

Hallo mensen,
Wie kan er mij helpen met een code om d.m.v. een check box [vinkje aan] enkele rijen te verbergen in een excel werkblad en wanneer ik het vinkje weer weghaal de rijen weer zichtbaar worden

bvd Hans

 

[joost verdaasdo]

Hai Hans,

Dat doe je met zogenaamde Toggle code voor aan en uitzetten van een handeling.

Simpel voorbeeldje:

Private Sub CheckBox1_Click()
    HideMyRows ("10")
End Sub

Private Sub CheckBox2_Click()
    HideMyRows ("10:15")
End Sub

Private Sub HideMyRows(sRows As String)
    Rows(sRows).EntireRow.Hidden = Not Rows(sRows).EntireRow.Hidden = True
End Sub

Zie bijlage voor code in actie...

See Yah! :thumb:

 

[H.Weenink]

dit is precies wat ik zocht,

heel hartelijk bedankt

 

[joost verdaasdo]

Hai Hans,

Goed zo..graag gedaan! :thumb: