Finding the active control on a sheet

[Stretchwickster]

Does anyone know how to find the currently focused/active control on an Excel worksheet?

Clive

http://www.kucu.co.uk

Ex nihilo, nihil fit (Out of nothing, nothing comes)

 

[TopJack]

What type of control are you trying to identify ?

 

[Stretchwickster]

A commandbutton (from the Visual Basic toolbar) or a text box (added from the Drawing toolbar not from the Visual Basic toolbar)

Clive

http://www.kucu.co.uk

Ex nihilo, nihil fit (Out of nothing, nothing comes)

 

[TopJack]

Is this a continuation from your other thread ? ...thread707-605683

I know how to identify a textbox but not a commandbutton.
Here is how to find the active textbox .......

Sub find_active_textbox()
' this routine will only identify a textbox name if it is selected

If (TypeName(Selection) = "TextBox&quot Then
MsgBox "The textbox currently selected is called " & Application.Selection.Name
End If

End Sub

Hope this helps,
TopJack.

 

[TopJack]

Did I mention .......

If you assign a macro to a textbox it no longer selects itself. Therefore my routine fails to identify. To find the choosen textbox use the "Application.Caller" variable to determine source of click as described in your other thread
(Thread707-605683).

I have to admit that I couldn't get a commandbutton to react properly to the "Application.Caller" variable. Maybe I'm doing something wrong.