View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Norman Jones Norman Jones is offline
external usenet poster
 
Posts: 5,302
Default Userform Objects

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" wrote in message
...
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