check the checkbox status
if cb1.value = true then
// code for hide
else
// code for unhide
endif
===== * ===== * ===== * =====
Daniel CHEN


www.Geocities.com/UDQServices
Free Data Processing Add-in<
===== * ===== * ===== * =====

"Qaspec" wrote in message
...
I'm using the following to hide rows from a checkbox. My question is how
can
i get it to unhide the rows if the checkbox is unmarked?

Private Sub CB1_Click()
For a = 10 To 30
Cells(a, 1).Select
Selection.EntireRow.Hidden = True


Next a
End Sub