La función `Hour` en VBA es utilizada para obtener la parte correspondiente a la hora de un valor de tipo `Date`. Esta devuelve un entero que representa la hora de dicho valor, de 0 (12:00 A.M.) a 23 (11:00 P.M.).

Aquí tienes un ejemplo de cómo usar la función `Hour`:

Sub EjemploHora()
    ' Obtener la fecha y hora actual
    Dim fechaActual As Date
    fechaActual = Now
    
    ' Extraer la hora de la fecha actual
    Dim horaActual As Integer
    horaActual = Hour(fechaActual)
    
    ' Mostrar la hora en una ventana de mensaje
    MsgBox "La hora actual es: " & horaActual
End Sub

En este ejemplo tienes un procedimiento subrutina en VBA llamado `EjemploHora`, que obtiene la fecha y la hora actual usando la función `Now`, luego extrae la hora de esa fecha y la asigna a la variable `horaActual`. Por último, muestra la hora actual en una ventana de mensaje.

Recuerda que la función `Hour` solo devuelve la hora. Si también necesitas los minutos y los segundos, deberías usar las funciones `Minute` y `Second`, respectivamente.

Aquí puedes ver cómo obtener la hora completa (hora, minutos y segundos):

Sub EjemploHoraCompleta()
    ' Obtener la fecha y hora actual
    Dim fechaActual As Date
    fechaActual = Now
    
    ' Extraer la hora, minutos y segundos de la fecha actual
    Dim horaActual As Integer
    Dim minutoActual As Integer
    Dim segundoActual As Integer
    
    horaActual = Hour(fechaActual)
    minutoActual = Minute(fechaActual)
    segundoActual = Second(fechaActual)
    
    ' Mostrar la hora completa en una ventana de mensaje
    MsgBox "La hora actual es: " & horaActual & ":" & minutoActual & ":" & segundoActual
End Sub

Cuando ejecutas el macro `EjemploHoraCompleta`, te mostrará la hora completa con la estructura «hora:minutos:segundos».

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