Looping through controls

[Guest]

Hi

How do you loop through the labels on a userform and ignore other controls
such as commandbuttons?

When I try and do this using the code below, I find that all the controls
are included in the loop.

Sub userform1_activate()
For each label in userform1.controls
label.caption = "test"
next
End Sub

Many thanks in advance
L

 

[Tom Ogilvy]

Sub userform1_activate()
For each ctrl in userform1.controls
if typeof ctrl is MSForms.Label then
ctrl.caption = "test"
end if
next
End Sub