Função VBA: Hour

Descrição

A função VBA Hour retorna um número inteiro correspondente à hora da data ou hora especificada.

Sintaxe Hora

Hora(data_hora)

Exemplo VBA Hour

Usando a função Hour para obter as informações de horário relevantes:

Sub HourExample1()
    
    myHour = #6:36:45 PM#
    
    MsgBox Hour(myHour)   'Retorna: 18

End Sub

Ou por data e hora (para o mesmo resultado):

Sub HourExample2()
    
    myDate = #10/31/2020 6:36:45 PM#
    
    MsgBox Hour(myDate)   'Retorna: 18

End Sub

Esta função também aceita hora ou data com hora em formato de texto:

Sub HourExample3()
    
    myDate = "31/10/2020 18:36:45"
    
    MsgBox Hour(myDate)   'Retorna: 18

End Sub