,

VBA Day() : macro pour extraire le jour d’une date

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

 ABCD
1 13/03/2019  
2 14/03/2019   
3 15/03/2019   
4 16/03/2019   
5 17/03/2019   

Le résultat

 ABCD
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