VBA - WeekDay

A função WeekDay retorna um número inteiro de 1 a 7 que representa o dia da semana para a data especificada.

Sintaxe

Weekday(date[,firstdayofweek])

Descrição do Parâmetro

  • Date- Um parâmetro obrigatório. O dia da semana retornará uma data especificada.

  • Firstdayofweek- Um parâmetro opcional. Especifica o primeiro dia da semana. Pode assumir os seguintes valores.

    • 0 = vbUseSystemDayOfWeek - Usar configuração de API de suporte ao idioma nacional (NLS)

    • 1 = vb Domingo - Domingo

    • 2 = vb segunda-feira - segunda-feira

    • 3 = vb terça - terça

    • 4 = vbQuarta - Quarta

    • 5 = vb quinta-feira - quinta-feira

    • 6 = vbFriday - Friday

    • 7 = vb Sábado - Sábado

Exemplo

Adicione um botão e adicione a seguinte função.

Private Sub Constant_demo_Click()
   msgbox("Line 1: " & Weekday("2013-05-16",1))
   msgbox("Line 2: " & Weekday("2013-05-16",2))
   msgbox("Line 3: " & Weekday("2013-05-16",2))
   msgbox("Line 4: " & Weekday("2010-02-16"))
   msgbox("Line 5: " & Weekday("2010-02-17"))
   msgbox("Line 6: " & Weekday("2010-02-18"))
End Sub

Quando você executa a função acima, ela produz a seguinte saída.

Line 1: 5
Line 2: 4
Line 3: 4
Line 4: 3
Line 5: 4
Line 6: 5