Comprobar si un formulario está abierto usando vba

comprobar-formulario-abierto-vba

Escrito por Administrador

12 de noviembre de 2021

En este post, vamos a ver cómo comprobar si un formulario de Microsoft Access está abierto usando VBA.

Esto es importante, porque si intentásemos cerrar un formulario y éste no estuviese abierto, nos aparecería un error. Y, si tienes procesos automatizados, necesitarás hacer este tipo de comprobaciones.

También es útil saberlo para actualizar un formulario que esté abierto en un determinado momento.

Al abrir el archivo de ejemplo (adjunto al final del post), se muestra el formulario "Consulta empleados", listando todos los empleados que hemos introducido en la tabla "Empleados", a través del formulario "Añadir empleados".

bloquear-access-fecha

Si pulsamos el botón Nuevo empleado que hay en la cabecera, se abrirá el formulario "Añadir empleados".

bloquear-access-fecha

Una vez introducidos los datos del nuevo empleado, queremos saber si el formulario "Consulta empleados" se encuentra abierto. En caso afirmativo, actualizaremos su listado para así poder visualizar el último registro introducido.

Para ello, hemos incluido el siguiente código en el evento "Al cerrar" del formulario "Añadir empleados".

Private Sub Form_Close()

'Si consulta empleados se encuentra abierta, actualizamos sus registros

If CurrentProject.AllForms("Consulta empleados").IsLoaded Then

Forms![Consulta empleados].Requery

End If

End Sub

bloquear-access-fecha
bloquear-access-fecha

De esta manera, has aprendido a comprobar si un formulario se encuentra abierto usando VBA, bien sea para añadirle información, actualizarlo o simplemente para cerrarlo.

Espero que te haya sido de utilidad. Hasta la próxima.

Descarga el archivo del ejemplo

0 comentarios

Enviar un comentario

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *

Este sitio usa Akismet para reducir el spam. Aprende cómo se procesan los datos de tus comentarios.

Quizá te interese,

Contacto