Comprobar si un formulario está abierto usando 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. 

Por último, invitarte a compartir tus dudas en los comentarios o en el foro, y a darle clic a la publicidad de abajo para ayudarme a seguir creando contenido.

Hasta la próxima.

Descarga el archivo del ejemplo

Por favor, haz clic en el anuncio y ayúdame a seguir creando contenido. Solo te lleva un segundo 😉



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.

Últimas publicaciones

Categorías

marzo 2023
L M X J V S D
 12345
6789101112
13141516171819
20212223242526
2728293031  

Debates en el foro

Avatar
Cuadro de texto

Contacto