current form and control

[alekm]

Hi,
how can I get name of current form and a current control.
thanx

alek_mil

 

[John Spencer]

Code snippet follows.

Dim v As Object
Set v = Screen.ActiveControl
Debug.Print v.Name, v.Parent.Name
Debug.Print Screen.ActiveForm.Name, Screen.ActiveForm.Caption

Beyond that it is hard to say since you didn't say where you wanted to run
the code. In a form event you can get the form name with Me.Name and the
current control with Me.ActiveControl.

--
John Spencer
Access MVP 2002-2005, 2007
Center for Health Program Development and Management
University of Maryland Baltimore County
..

 

[alekm]

Thanx,
I'd like to run it from Event procedure.
One more question: how do I determine value Me.ActiveControl has?

alek_mil

 

[Douglas J. Steele]

Value is usually the default property, so simply referring to
Screen.ActiveControl should give the its value. If not, try
Screen.ActiveControl.Value