Have you tried

Userform1.MultiPage1.Pages(0).Controls("CheckBox" & x).Value = True

--

HTH

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


"John Wilson" wrote in message
...
Initially I was setting the values of a group of CheckBoxes on a UserForm
via the following code (and it worked well):

Private Sub Binary2CB()
cbResult = "0011001101" ' (for test purposes)
Dim x As Integer
For x = 1 To 10
If Mid(cbResult, x, 1) = 1 Then
Userform1.Controls("CheckBox" & x).Value = True
End If
Next x
End Sub

I've since moved the CheckBoxes onto a Mulitpage control
on the same UserForm.
How can I modify the code above to make this work?
(I've tried a number of different manipulations but can't seem to find the
right combination).

Thanks,
John