WAIT - Mostrar un formulario VBA durante un tiempo predeterminado
Con el método WAIT puedes hacer que un formulario se cierre después de un tiempo determinado. Esto puede ser útil para presentar información al usuario ('La importación ha terminado con éxito', 'El archivo está guardado' etc). El truco está en utilizar el método WAIT de VBA.
Procedimiento
Crea un formulario 'frmMensaje' con el mensaje que quieres que aparezca. Añade este código al formulario. El ejemplo nos dice que la rutina se va a esperar ('Wait') hasta la hora
Now + TimeValue("00:00:04")
Es decir la hora actual más 4 segundos.
Sub Importar_Access() Private Sub UserForm_Activate() Application.Wait Now + TimeValue("00:00:04") frmMensaje.Hide End Sub
Luego, para mostrar el formulario en cualquier parte de tu programa, aplicas este código.
frmMensaje.Show
En el ejemplo de abajo, el formulario se mostrará al abrir el libro (ponemos el código en el contenedor de código VBA 'EsteLibro'.
Private Sub Workbook_Open() frmMensaje.Show End Sub



