Counting the number of controls in a sub form!!!!

[Kango]

Hi All,

How do i through Vba count the number of controls that are in my subform?.

I am sure this is easier then it sounds?

Thanks

 

[doulostheou]

The code is the same as counting controls in a regular form, but you need to include a .form after the subform so that it accesses it as a form and not another control.

Sub CountSubControls()
    Dim ctl As Control
    Dim i As Integer
    
    For Each ctl In Forms!frmMainForm!subform.Form
        i = i + 1
    Next ctl
    
    MsgBox "Total number of controls is " & i
End Sub

 

[Kango]

Hey!

Thanks for doing that. I am just using the code now, will hopefully work!!!

Thanks Again!!!