Userform Objects

[Kaval]

Can objects on a userform (eg. all labels or all command buttons) be treated
as a collection?

I have a userform with a large number of labels and I would like to perform
a similar operation on each label without naming them one by one in the code.

Thanks, Kaval

[Norman Jones]

Hi Kaval,

Try something like:

Sub Tester()

Dim Ctrl As MSForms.Control
For Each Ctrl In UserForm1.Controls
If TypeOf Ctrl Is MSForms.Label Then
'Do something: e.g.:
MsgBox Ctrl.Caption
Else
'Do something else
End If
Next Ctrl

End Sub


---
Regards,
Norman



"Kaval" <[email protected]> wrote in message
news:[email protected]...
> Can objects on a userform (eg. all labels or all command buttons) be
> treated
> as a collection?
>
> I have a userform with a large number of labels and I would like to
> perform
> a similar operation on each label without naming them one by one in the
> code.
>
> Thanks, Kaval