Cuenta regresiva (timer) en Excel
Sub conteo() inicio = Now restante = Range(«b2») Do DoEvents Range(«b2») = inicio + restante – Now Loop End Sub Sub detener() End End Sub El archivo está en esta dirección. Hice unas modificaciones y aquí pueden encontrar un archivo …