Group,

How is it that if i specify the below:

Public WithEvents mTestCtl As MSForms.TextBox

it will work fine, but if specified as MSForms.Control, it errors out with:

Run-time error '459':

Object or class does not support the set of events

please review the code below.

Public WithEvents mTestCtl As MSForms.Control
Sub SetControl(ctl As MSForms.Control)
Set mTestCtl = ctl '<-this is where it errors out
End Sub
Private Sub mTestCtl_Exit(ByVal Cancel As MSForms.ReturnBoolean)
MsgBox mTestCtl.Value
End Sub


Please help.


Thanks in advance.


Ronin