La fonction VBA Day() permet de réaliser une macro pour extraire le jour d'une cellule contenant une date dans Excel.
La fonction VBA Day()
La fonction Day() suit la syntaxe suivante :
Day(date)
Exemple de macro avec la fonction Day()
La macro
Sub macro()
Dim c As Range 'Variable
For Each c In Range("A1:A5") 'Colonne
ActiveCell.Offset(0, 0).FormulaR1C1 = _
Day(c)ActiveCell.Offset(1, 0).Select
Next c
End Sub
Comment exécuter la macro ?
- Copier la macro dans Visual Basic
- Remplacer la plage en gras par la nouvelle plage de valeurs
- Sélectionner la cellule dans laquelle afficher le 1er résultat
- Exécuter la macro
Les données sources
| A | B | C | D | |
|---|---|---|---|---|
| 1 | 13/03/2019 | |||
| 2 | 14/03/2019 | |||
| 3 | 15/03/2019 | |||
| 4 | 16/03/2019 | |||
| 5 | 17/03/2019 |
Le résultat
| A | B | C | D | |
|---|---|---|---|---|
| 1 | 13/03/2019 | 13 | ||
| 2 | 14/03/2019 | 14 | ||
| 3 | 15/03/2019 | 15 | ||
| 4 | 16/03/2019 | 16 | ||
| 5 | 17/03/2019 | 17 |