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

↰ Previous page