ник: час
то верно видимо не в этом событии, а где ж ловить мне надо бы ловить любой клик по полю и его название брать
так таже история
Sub ActiveObjects()
Dim frm As Form, ctl As Control
Set frm = Screen.ActiveForm
MsgBox frm.NAME & " активная форма."
Set ctl = Screen.ActiveControl
MsgBox ctl.NAME & " активен control " _
& "в этой форме."
End Sub
|