Screen.ActiveControl property (Access)
Use the ActiveControl property together with the Screen object to identify or refer to the control that has the focus. Read-only Control object.
Syntax
expression.ActiveControl
expression A variable that represents a Screen object.
Remarks
This property setting contains a reference to the Control object that has the focus at run time.
Use the ActiveControl property to refer to the control that has the focus at run time together with one of its properties or methods. The following example assigns the name of the control with the focus to the strControlName
variable.
Dim ctlCurrentControl As Control
Dim strControlName As String
Set ctlCurrentControl = Screen.ActiveControl
strControlName = ctlCurrentControl.Name
If no control has the focus when you use the ActiveControl property, or if all of the active form's controls are hidden or disabled, an error occurs.
Example
The following example assigns the active control to the ctlCurrentControl
variable, and then takes different actions depending on the value of the control's Name property.
Dim ctlCurrentControl As Control
Set ctlCurrentControl = Screen.ActiveControl
If ctlCurrentControl.Name = "txtCustomerID" Then
.
. ' Do something here.
.
ElseIf ctlCurrentControl.Name = "btnCustomerDetails" Then
.
. ' Do something here.
.
End If
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.
피드백
https://aka.ms/ContentUserFeedback
출시 예정: 2024년 내내 콘텐츠에 대한 피드백 메커니즘으로 GitHub 문제를 단계적으로 폐지하고 이를 새로운 피드백 시스템으로 바꿀 예정입니다. 자세한 내용은 다음을 참조하세요.다음에 대한 사용자 의견 제출 및 보기