For Each Combobox
This is what I ended up with. I needed it to count how many had
things in it. I may not have been as clear as I needed to be. Thanks
for your help and Dave's.
Thanks,
Jay
Dim ctl As Control
Dim lng As Long
For Each ctl In Me.Controls
If TypeOf ctl Is msforms.ComboBox Then
If ctl.Value < "" Then lng = lng + 1
End If
Next ctl
MsgBox lng
|