La fonction WeekdayName permet de réaliser une macro pour renvoyer le nom du jour de la semaine dans Excel.
La fonction WeekdayName
La fonction WeekdayName suit la syntaxe suivante :
WeekdayName (jour_semaine, abréviation, premier_jour)
où :
- jour_semaine correspond au jour numérique de la semaine, soit un entier allant de 1 (pour lundi) à 7 (pour dimanche)
- abréviation (facultatif) prend l'une des valeurs suivantes :
- True : le nom du jour est abrégé (e.g. lun. / mar. / mer.)
- False : le nom entier est conservé (e.g. lundi / mardi / mercredi)
- premier_jour (facultatif) correspond au premier jour de la semaine et prend 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 WeekdayName
La macro
Sub macro()
Dim c As Range 'Variable
For Each c In Range("A1:A5") 'Plage
ActiveCell.Offset(0, 0).FormulaR1C1 = _
WeekdayName(Day(c))ActiveCell.Offset(1, 0).Select
Next c
End Sub
Les données sources
| A | B | C | D | |
|---|---|---|---|---|
| 1 | 01/02/2015 | |||
| 2 | 02/02/2015 | |||
| 3 | 03/02/2015 | |||
| 4 | 04/02/2015 | |||
| 5 | 05/02/2015 |
Le résultat
| A | B | C | D | E | |
|---|---|---|---|---|---|
| 1 | 01/02/2015 | lundi | |||
| 2 | 02/02/2015 | mardi | |||
| 3 | 03/02/2015 | mercredi | |||
| 4 | 04/02/2015 | jeudi | |||
| 5 | 05/02/2015 | vendredi |