Looping through controls

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

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

--
Regards,
Tom Ogilvy

"Libby" <Libby@discussions.microsoft.com> wrote in message
news:2D2BF8AD-ED8E-49D1-BC69-77DBD6694E89@microsoft.com...
> 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
>