Dim i As Integer
For i = 1 To 14
Sheet11.OLEObjects("chkParams" & i).Object.Value = False
Next i


--

HTH

RP
(remove nothere from the email address if mailing direct)


"packat" wrote in message
news:wklBd.8300$1U6.2321@trnddc09...


I have 10 checkboxes with names chkParams1,
chkParams2,...,chkParams10.

I am writing a sub to reset these boxes using a control box.
I could simply put the statement:
Sheet11.chkParams1.Value = False .....

for all of the boxes. But I am wondering if there is a
better way using a for loop.
How do I make the checkbox name dynamic so that I can do the
following:

Private Sub btnResetConst_Click()
Dim i As Integer
For i = 1 To 14
Sheet11.chkParams???.Value = False
next i
End Sub



Thanks,
pac