Find name of userform control

[Dean76]

Hi,

Does anyone know if it is possible to extract a control name from a multipage on a userform upon actioning the control?

I have CheckBox1 and, when it is directly on the userform (no multipage), using the code Me.ActiveControl.Name returns CheckBox1 on click - which is exactly what I am after.

The problem arises as soon as i place CheckBox1 on a multipage then Me.ActiveControl.Name returns MultiPage1.

Is there a way around this so I can still extract the checkbox name whilst it is on a multipage?

Thanks for help!

 

[RoryA]

As long as you won't be nesting container controls, you could use:

    Select Case TypeName(Me.ActiveControl)
        Case "MultiPage"
            MsgBox Me.ActiveControl.SelectedItem.ActiveControl.Name
        Case "Frame"
            MsgBox Me.ActiveControl.ActiveControl.Name
        Case Else
            MsgBox Me.ActiveControl.Name
    End Select

If they might be nested, you'd need a loop to keep iterating until you reached a non-container type control.

 

[Dean76]

Select Case TypeName(Me.ActiveControl) Case "MultiPage" MsgBox Me.ActiveControl.SelectedItem.ActiveControl.Name Case "Frame" MsgBox Me.ActiveControl.ActiveControl.Name Case Else MsgBox Me.ActiveControl.Name End Select

Perfect, that's saved a couple of hours of repetitive typing - thanks!