Hide multiple checkboxes when a row is hidden

I'd guess you could do something like:

Sub hide_unhide_checkboxes()
Dim chkbx
For Each chkbx In ActiveSheet.CheckBoxes
    If Columns(chkbx.TopLeftCell.Column).Hidden = True Then chkbx.Visible = False Else chkbx.Visible = True
Next
End Sub