VBA FormatDateTime() : macro pour formater sous forme de date

La fonction FormatDateTime dans VBA permet de réaliser une macro pour pour formater sous forme de date.

La fonction FormatDateTime

La fonction VBA FormatDateTime suit la syntaxe suivante :

FormatDateTime(variable,format)

où :

  • variable correspond à la chaine à analyser
  • format correspond au format de date et peut prendre les valeurs suivantes :
    • vbGeneralDate : date et /ou heure au format par défaut
    • vbShortDate : date au format court
    • vbLongDate : date au format long
    • vbShortTime : heure au format hh:mm sur 24 heures
    • vbLongTime : heure au format spécifié dans les paramètres de l'ordinateur

Exemple de macro avec FormatDateTime

La macro

Sub nommacro()

Dim i As Integer

For i = 1 To 5

'Résultat dans Ligne de 1 à 5, Colonne 2
Cells(i, 2).Value = FormatDateTime(Cells(i, 1))

'Résultat dans Ligne de 1 à 5, Colonne 3
Cells(i, 3).Value = FormatDateTime(Cells(i, 1), vbShortDate)

Next i

End Sub

Les données sources

ABCDE
1438314383143831
244707,6226/05/2022 14:52:4826/05/2022
345601,772445423,772395833345423
446513,80784846543,807847222246543
547444,0840049622/11/2029 02:00:5822/11/2029

Le résultat

ABCDE
1438314383143831
244707,6226/05/2022 14:52:4826/05/2022
345601,772445423,772395833345423
446513,80784846543,807847222246543
547444,0840049622/11/2029 02:00:5822/11/2029