xltoday.net

EXCEL 2007 TABLAS Y GRAFICOS


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