Propiedad Form.ActiveControl (Access)
Use la propiedad ActiveControl junto con el objeto Screen para identificar o hacer referencia al control que tiene el foco. Objeto Control de sólo lectura.
Sintaxis
expresión. ActiveControl
expresión Variable que representa un objeto Form.
Comentarios
El valor de esta propiedad contiene una referencia al objeto Control que tiene el enfoque en tiempo de ejecución.
Use la propiedad ActiveControl para hacer referencia al control que tiene el foco en tiempo de ejecución junto con una de sus propiedades o métodos. En el siguiente ejemplo se asigna el nombre del control con el foco a la variable strControlName
.
Dim ctlCurrentControl As Control
Dim strControlName As String
Set ctlCurrentControl = Screen.ActiveControl
strControlName = ctlCurrentControl.Name
Si ningún control tiene el foco cuando se utiliza la propiedad ActiveControl o si todos los controles del formulario activo están ocultos o deshabilitados, se produce un error.
Ejemplo:
En el ejemplo siguiente se asigna el control activo a la ctlCurrentControl
variable y, a continuación, se realizan diferentes acciones en función del valor de la propiedad Name del control.
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
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.