Section courante

A propos

Section administrative du site

WEEKDAY

Jour de la semaine
Visual Basic

Syntaxe

Function WEEKDAY(Date, Optional ByVal FirstDayOfWeek As VbDayOfWeek = vbSunday) As Integer

Paramètres

Nom Description
Date Ce paramètre permet d'indiquer la date contenant l'expression à traiter
FirstDayOfWeek Ce paramètre permet d'indiquer le premier jour de la semaine devant être calculé pour la semaine retourné :
Valeur Constante Description
1 vbSunday Cette valeur indique le Dimanche
2 vbMonday Cette valeur indique le Lundi
3 vbTuesday Cette valeur indique le Mardi
4 vbWednesday Cette valeur indique le Mercredi
5 vbThursday Cette valeur indique le Jeudi
6 vbFriday Cette valeur indique le Vendredi
7 vbSaturday Cette valeur indique le Samedi

Retour

Valeur Description
1 Cette valeur indique le Dimanche
2 Cette valeur indique le Lundi
3 Cette valeur indique le Mardi
4 Cette valeur indique le Mercredi
5 Cette valeur indique le Jeudi
6 Cette valeur indique le Vendredi
7 Cette valeur indique le Samedi

Description

Cette fonction retourne le jour de la semaine d'une date.

Exemple

Voici un exemple d'une utilisation typique de cette fonction :

  1. Sub Main()
  2.  MsgBox "WeekDay(""2010-01-09"",1)=" & WeekDay("2010-01-09",1) & vbCrLf & _
  3.         "WeekDay(""2010-01-09 05:30:00"",2)=" & WeekDay("2010-01-09 05:30:00",2) & vbCrLf & _
  4.         "WeekDay(""2010-01-09"",3)=" & WeekDay("2010-01-09",3) & vbCrLf & _
  5.         "WeekDay(""2010-01-09 05:30:00"",4)=" & WeekDay("2010-01-09 05:30:00",4) & vbCrLf & _
  6.         "WeekDay(""2010-01-09"",5)=" & WeekDay("2010-01-09",5) & vbCrLf & _
  7.         "WeekDay(""2010-01-09 05:30:00"",6)=" & WeekDay("2010-01-09 05:30:00",6) & vbCrLf & _
  8.         "WeekDay(""2010-01-09"",7)=" & WeekDay("2010-01-09",7) & vbCrLf & _
  9.         "WeekDay(""2010-01-09"",vbSunday)=" & WeekDay("2010-01-09",vbSunday) & vbCrLf & _
  10.         "WeekDay(""2010-01-09"",vbMonday)=" & WeekDay("2010-01-09",vbMonday) & vbCrLf & _
  11.         "WeekDay(""2010-01-09"",vbMonday)=" & WeekDay("2010-01-09",vbTuesday )
  12. End Sub

on obtiendra le résultat suivant :

WeekDay("2010-01-09",1)=7
WeekDay("2010-01-09 05:30:00",2)=6
WeekDay("2010-01-09",3)=5
WeekDay("2010-01-09 05:30:00",4)=4
WeekDay("2010-01-09",5)=3
WeekDay("2010-01-09 05:30:00",6)=2
WeekDay("2010-01-09",7)=1
WeekDay("2010-01-09",vbSunday)=7
WeekDay("2010-01-09",vbMonday)=6
WeekDay("2010-01-09",vbMonday)=5


Dernière mise à jour : Lundi, le 19 novembre 2012