Função VBA: Now

Descrição

Uma função VBA Now retorna dados e hora atual do sistema.

Sintaxe Now

Agora

Exemplo VBA Now

Vamos armazenar os dados retornados pela função Now na célula A1:

Sub NowExample1()

    Range("A1") = Now
    
End Sub

Vamos exibir os dados retornados pela função Now em formato de texto:

Sub NowExample2()

    MsgBox Format(Now, "d mmmm yyyy hh:nn") 'Retorna, por exemplo: 2 de novembro de 2020 13h08
    
End Sub

Realizaremos a ação apenas por pelo menos 17h e um dia da semana:

Sub NowExample3()

    If Hour(Now) >= 17 And Weekday(Now, vbMonday) < 6 Then
        MsgBox "A jornada de trabalho está quase acabando!"
    End If
    
End Sub