Función Cronómetro

Devuelve un valor de tipo Single que representa el número de segundos transcurridos desde la medianoche.

Sintaxis

Cronómetro

Observaciones

En Microsoft Windows, la función Timer devuelve partes fraccionarias de un segundo. En el equipo Macintosh, la resolución del temporizador es de un segundo.

Ejemplo de consulta

Expresión

Resultados

SELECCIONA Timer () como SecondsPast de ProductSales GROUP BY Timer ();

Devuelve el número de segundos transcurridos desde medianoche en función de la hora del sistema y se muestra en la columna SecondsPast.

Ejemplo de VBA

Nota: En los siguientes ejemplos se muestra el uso de esta función en un módulo de Visual Basic para aplicaciones (VBA). Para obtener más información sobre cómo trabajar con VBA, seleccione Referencia del programador en la lista desplegable situada junto a Buscar y escriba uno o más términos en el cuadro de búsqueda.

Este ejemplo usa la función Timer para pausar la aplicación. En el ejemplo también se usa DoEvents para producir otros procesos durante la pausa.

Dim PauseTime, Start, Finish, TotalTime
If (MsgBox("Press Yes to pause for 5 seconds", _
4)) = vbYes Then
PauseTime = 5 ' Set duration.
Start = Timer ' Set start time.
Do While Timer < Start + PauseTime
DoEvents ' Yield to other processes.
Loop
Finish = Timer ' Set end time.
TotalTime = Finish - Start ' Calculate total time.
MsgBox "Paused for " & TotalTime & " seconds"
Else
End
End If

Nota:  Esta página se ha traducido mediante un sistema automático y es posible que contenga imprecisiones o errores gramaticales. Nuestro objetivo es que este contenido le resulte útil. ¿Podría decirnos si la información le resultó útil? Aquí puede consultar el artículo en inglés.

Vea también

Elegir la función de fecha correcta

Ampliar sus conocimientos de Office
Explorar los cursos
Obtener nuevas características primero
Únase a los participantes de Office Insider

¿Le ha sido útil esta información?

¡Gracias por sus comentarios!

Gracias por sus comentarios. Quizá le interese ponerse en contacto con uno de nuestros agentes de soporte de Office.

×