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