Esta macro es interesante, te muestra una cuenta regresiva donde tu mismo seleccionas la cantidad de minutos.
El código es muy sencillo, puedes modificarlo a tu gusto.
Este es el código que debes adicionar en un modulo en Excel
Dim inicio, restante
'Creado por Practicaprende.com
Private Sub reiniciar()
Dim minutos As Integer
minutos = InputBox("Cantidad de Minutos", "Temporizador")
restante = minutos / 24 / 60
Sheets("Temporizador").Range("E14") = restante
inicio = Now
End Sub
Sub iniciar()
On Error GoTo salir:
Call reiniciar
Do
DoEvents
If (inicio = Empty Or restante = Empty) Then
Call reiniciar
End If
If (inicio + restante - Now < 0) Then
Call fin
MsgBox "Finalicé", vbInformation, "Temporizador"
Else
Sheets("Temporizador").Range("E14") = inicio + restante - Now
End If
Loop
salir:
End Sub
Sub fin()
End
End Sub
Si descargas el archivo al final del artículo puedes internarlo tú mismo.
CONCLUSION
Ya aprendiste como utilizar un temporizador en Excel con Macros, ya te queda a ti personalizarlo para adaptarlo a tus necesidades.
Si quieres ver mas ejemplos que tenemos visita nuestro Blog
Espero te guste!
Saludos!
☕Si te ha gustado el contenido puedes invitarme un café! ☕
DESCARGAR EJEMPLO
En el siguiente link puedes descargar un sencillo ejemplo, Si tienes alguna duda o sugerencia para mejorar el código, simplemente comenta en el formulario de Contacto
Para descargar el archivo utilizado es necesario estar registrado. Acá Puedes Registrarte y si ya estas registrado puedes ingresar a tu cuenta de usuario.
Excelente, aporte era lo que buscaba muchas gracias.
Me alegra que sea funcional! Un saludo!!
Me gustó el temporizador, gracias; pero vi uno en YouTube que está muy completo: tiene botones para mostrar la hora, cronómetro y temporizador; con controles para la hora, minutos y segundos, ese me encantó pero no ponen ni el tutorial ni el tutorial para hacerlo.
Voy a insistir en la búsqueda porque estoy seguro que alguien estará dispuesto a desarrollarlo y compartirlo.
Es muy loable la labor de ustedes, y destaca porque en este medio existe mucha envidia, yo la viví en carne propia durante mi vida laboral, ya estoy jubilado y tengo espacio para aprender, pero siento que el tiempo se me agota, a los 68 años y en silla de ruedas, pero con todo el ánimo por delante.
Sigan adelante chicos, repito que es muy meritoria su actitud.
Carlos! ¡Que grato que nos escribas y nos comentes eso!
Muy interesante completar con las características que mencionas, yo he mejorado varios artículos basados en los comentarios que gratamente recibo, así que te diría que puedo ir completando este artículo con esas características que mencionas.
Sería genial que una vez yo actualice el articulo con el nuevo archivo me dieras tu opinión con las nuevas características.
Un saludo y quedo atento si necesitas algo más. 👍