La funzione VBA Weekday restituisce il numero del giorno della settimana (da 1 a 7) per la data specificata.
Weekday(data)
O
Weekday(data, primo_giorno_della_settimana)
Per impostazione predefinita, il primo giorno della settimana è domenica (1) e l'ultimo giorno è sabato (7).
Per modificare la numerazione in modo che lunedì sia il primo giorno della settimana (1) e domenica sia l'ultimo giorno della settimana (7), aggiungi il valore 2 come secondo argomento quando usi questa funzione:
Giorno della settimana(data, 2)
Utilizzo della funzione Weekday per visualizzare il numero del giorno della settimana per più date:
Sub WeekdayExample1()
MsgBox Weekday(#11/2/2020#, 2) 'Resi: 1
MsgBox Weekday("3.11.20", 2) 'Resi: 2
MsgBox Weekday("4 nov 2020", 2) 'Resi: 3
MsgBox Weekday("5/11/2020 17:30:21", 2) 'Resi: 4
End Sub
Utilizzo della funzione Weekday per distinguere tra un giorno feriale e un fine settimana:
Sub WeekdayExample2()
If Weekday(Now, 2) < 6 Then
MsgBox "Giorno feriale..."
Else
MsgBox "È il fine settimana!"
End If
End Sub