Assessing whether any checkboxes are checked within frame

Is it possible to check and see if at least 1 checkbox in a frame is checked.
I am assuming that you have to group the checkboxes and check on of their
properties within a For Each loop

Thanks.

Dim bChecked as Boolean
Dim ctl as Control

bChecked = False
for each ctl in Userform1.Frame1.Controls
if typeof ctl is MSForms.CheckBox then
if ctl.Value then
bChecked = True
exit for
end if
end if
Next
if bChecked = False then

msgbox "Please check on box"
End if

--
Regards,
Tom Ogilvy

"ExcelMonkey" <ExcelMonkey@discussions.microsoft.com> wrote in message
news:AB11F727-9014-4740-BBBD-E1125F0EDF68@microsoft.com...
> Is it possible to check and see if at least 1 checkbox in a frame is
checked.
> I am assuming that you have to group the checkboxes and check on of their
> properties within a For Each loop
>
> Thanks.