maybe name your checkboxes nicely:

checkbox01 through checkbox29

and then pick out the ones you want hidden:

Option Explicit
Private Sub CommandButton1_Click()
Dim iCtr As Long
For iCtr = 13 To 26
Me.Controls("Checkbox" & Format(iCtr, "00")).Visible = False
Next iCtr
End Sub

Matt wrote:

That would work, except that I don't want all of the checkboxes on the worksheet to be invisible, just a selection of them. Any ideas? Thanks.

--

Dave Peterson