Catégories
Macro VBA Date Macros VBA

VBA Weekday() : macro pour extraire le jour de la semaine

Partager :

La fonction Weekday permet de réaliser une macro renvoie le jour de la semaine sous forme de nombre entier.

La fonction Weekday

La fonction VBA Weekday suit la syntaxe suivante :

Weekday(date, premier_jour)

où :

premier_jour correspond au premier jour de la semaine et peut prendre l'une des valeurs suivantes :

  • vbSunday : la semaine commence dimanche
  • vbMonday : la semaine commence lundi
  • vbTuesday : la semaine commence mardi
  • vbWednesday : la semaine commence mercredi
  • vbThursday : la semaine commence jeudi
  • vbFriday : la semaine commence vendredi
  • vbSaturday : la semaine commence samedi

Exemple de macro avec Weekday

La macro

Sub macro()

Dim c As Range 'Variable

For Each c In Range("A1:A5") 'Plage

ActiveCell.Offset(0, 0).FormulaR1C1 = _
Weekday(c)

ActiveCell.Offset(1, 0).Select

Next c

End Sub

Les données sources

ABCDE
101/02/2019 09:09
229/04/2019 09:01
325/07/2019 13:04
420/10/2019 21:18
516/01/2020 09:44

Le résultat

ABCDE
101/02/2019 09:096
229/04/2019 09:012
325/07/2019 13:045
420/10/2019 21:181
516/01/2020 09:445