La fonction VBA CDate permet de réaliser une macro pour convertir les dates et les heures en nombre dans Excel.
La variable CDate
La fonction VBA CDate suite la syntaxe suivante :
CDate(variable)
Exemple de macro avec CDate
La macro
Sub macro1()
Dim c As Range 'Variable
For Each c In Range("A1:A5") 'Colonne
ActiveCell.Offset(0, 0).FormulaR1C1 = _
CDate(c)ActiveCell.Offset(1, 0).Select
Next c
End Sub
Les données sources
| A | B | C | D | E | |
|---|---|---|---|---|---|
| 1 | 12/01/2021 | ||||
| 2 | 12/02/2021 | ||||
| 3 | 12/03/2021 | ||||
| 4 | 12/04/2021 | ||||
| 5 | 13/04/2021 |
Le résultat
| A | B | C | D | E | |
|---|---|---|---|---|---|
| 1 | 12/01/2021 | 44208 | |||
| 2 | 12/02/2021 | 44239 | |||
| 3 | 12/03/2021 | 44267 | |||
| 4 | 12/04/2021 | 44298 | |||
| 5 | 13/04/2021 | 44299 |