Mensaje al abrir libro
Hola, por favor necesito tu ayuda en esto: Cuando abra el libro de mi proyecto, este me debe mostrar un mensaje con la hora en formato 12 horas (am o pm) y pasados 5 ó 10 segundos se debe cerrar automáticamente.
Por tu pronta respuesta te agradezco mucho. Chao!!
1 Respuesta
Lo que necesitas se logra mediante el uso de un formulario en cuyo código debes añadir estas lineas
Private Sub UserForm_Activate()
UserForm1. Label1.Caption = Application. WorksheetFunction.Text(Now(),"hh:mm AM/PM")
Application. Wait (Now + TimeValue("00:00:02"))
Unload UserForm1
End SubSupongo que el formulario se llama UserForm1 y tiene una etiqueta llamada Label1, en la cual se mostrará la hora actual; el mensaje en este caso se muestra por 2 segundos
Para que el mensaje sea mostrado cuando se abre el libro debes modificar el evento open del libro con esta línea
UserForm1.Show
Pruébalo y me cuentas como te va (lo he probado y funciona), puedes obtener mayores indicaciones de esta pagina, de la ayuda del VBA ó volver a escribirme.
Hola experto, A tiempo y una excelente respuesta. Te agradezco de corazón y que Dios te bendiga. Te colocaré como mi experto favorito y espero que estés ahí cuando te vuelva a necesitar. Chaooooo!!
