En VBA (Visual Basic for Applications), la función Time se utiliza para obtener la hora actual del sistema. Esta función devuelve un valor de tipo Variant con un subtipo Date que representa la hora actual del día en formato de horas, minutos y segundos.

Ejemplo

Sub DisplayCurrentTime()
    ' Declaramos una variable para almacenar la hora actual
    Dim currentTime As Variant
    
    ' Obtenemos la hora actual usando la función Time
    currentTime = Time
    
    ' Mostramos la hora actual en un cuadro de mensaje
    MsgBox "La hora actual es: " & currentTime
End Sub

Al ejecutar este subprocedimiento, se mostrará un cuadro de mensaje mostrando la hora actual.

Además, si quieres manipular solo partes específicas de la hora actual, puedes utilizar las funciones Hour, Minute y Second para obtener la hora, minutos y segundos actuales, respectivamente. Aquí te muestro un ejemplo:

Sub DisplayPartsOfTime()
    ' Obtener y mostrar la hora actual
    MsgBox "Hora actual: " & Hour(Time)
    
    ' Obtener y mostrar los minutos actuales
    MsgBox "Minutos actuales: " & Minute(Time)
    
    ' Obtener y mostrar los segundos actuales
    MsgBox "Segundos actuales: " & Second(Time)
End Sub

Al ejecutar este subprocedimiento, se mostrarán tres cuadros de mensaje sucesivamente, cada uno mostrando la hora, los minutos y los segundos actuales.

Recuerda que estas funciones devuelven la hora del sistema, por lo tanto, si la hora del sistema esta configurada incorrectamente, los valores que devuelva estarán igualmente incorrectos.

Conoce nuestra tienda

Ver más productos

Mejora tu nivel y logra tus objetivo

Excel

Access

Power BI

Ayúdanos a hacer crecer el proyecto