Função VBA: Second

Descrição

A função VBA Second retorna um número inteiro correspondente aos segundos da data ou hora especificada.

Sintaxe Second

Second(data_hora)

Exemplo VBA Second

Usando a função Second para obter as informações de tempo relevantes:

Sub SecondExample1()
    
    myHour = #6:36:45 PM#
    
    MsgBox Second(myHour) 'Retorna: 45

End Sub

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

Sub SecondExample2()
    
    myDate = #10/31/2020 6:36:45 PM#
    
    MsgBox Second(myDate) 'Retorna: 45

End Sub

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

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

End Sub