Ayuda en macros

Necesito realizar un macros para un aviso que se visualice cada cierta cantidad de tiempo, por ejemplo aparezca cada 2 horas o cada 4 horas

1 Respuesta

Respuesta
1

Debes de tener en cuenta, que el archivo debe de estar abierto, para que la macro se ejecute. De no ser asi, podemos probar con un script y tareas programadas

Hola, el archivo esta abierto las 24 horas

¿Necesitas qué se ejecute todos los dias a las mismas horas?, o despues de que pase algun evento x cantidad de tiempo despues

Todos los días a las mismas horas, cada 2 horas que se visualice un mensaje que recuerde una operación

Te envío este código para que lo pruebes.

Para agregar el código das alt+f11 vas al lado izquierdo donde dice thisworkbook le das doble click y lo pegas.

En los comentarios coloco las variables que debes de modificar. Cualquier duda me avisas, No se te olvide dar por finalizada la pregunta.

Link libro ejemplo:http://sdrv.ms/Zd2v2S

'By Viktor [email protected]
Const HoraInicio = "00:30:00" 'Hora en que inicia la ejecucion, el libro debe abrirse antes de esta hora
Const Repetir = "00:00:10" 'Tiempo entre mensajes ejemplo 10 segundos
Const Info = "Mensaje de Información" 'Mensaje publicado
Public RunWhen As Double
Sub Mensaje()
 MsgBox Info, vbInformation
 RunWhen = Now + TimeValue(Repetir)
 Application.OnTime RunWhen, "ThisWorkbook.Mensaje"
End Sub
Private Sub Workbook_Open()
 Application.OnTime TimeValue(HoraInicio), "ThisWorkbook.Mensaje"
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
 On Error Resume Next
 Application.OnTime RunWhen, "ThisWorkbook.Mensaje", , False
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas