iterate controls in forms

J

Jason

Hello,

Does someone has a code which iterates for example all optiongroups in a
form?

What i want to do is to print the name of each optiongroup and
togglebutton and it's values in index order.
 
S

Stefan Hoffmann

hi Jason,
Does someone has a code which iterates for example all optiongroups in a
form?
Click to expand...

Dim Count As Long

For Count = 0 To Controls.Count - 1
Debug.Print Controls.Item(Count).Name;
If TypeOf Controls.Item(Count) Is Access.OptionGroup Then
Debug.Print " is OptionGroup"
Else
Debug.Print
End If
Next Count


mfG
--> stefan <--
 
Top