Catégories
Macro VBA Conversion Macros VBA

VBA CDate() : macro pour convertir une date en nombre

Partager :

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

ABCDE
112/01/2021
212/02/2021
312/03/2021
412/04/2021
513/04/2021

Le résultat

ABCDE
112/01/202144208
212/02/202144239
312/03/202144267
412/04/202144298
513/04/202144299