Comment obtenir la date et l’heure actuelles ?
Dans ce didacticiel, nous allons apprendre différentes manières d’obtenir la date et l’heure du jour à l’aide d’un code VBA.
Date du jour en VBA
Dans VBA, il existe une fonction appelée » DATE » que vous pouvez utiliser pour obtenir la date actuelle. Lorsque vous utilisez cette fonction, tout comme dans l’exemple suivant, elle renvoie la date actuelle en fonction du paramètre de date du système.
Sub myMacro()
Range("A1") = Date
End Sub
Lorsque vous exécutez ce code , il entre la date actuelle dans la cellule A1 et utilise le format actuel de la date que vous avez dans Excel.
Vous pouvez également utiliser cette fonction pour obtenir la date du jour dans une boîte de message , tout comme le code suivant.
Sub myMacro()
MsgBox Date
End Sub
Date du jour et heure actuelle
De la même manière, il existe une fonction appelée « MAINTENANT » que vous pouvez utiliser pour obtenir la date et l’heure du jour. Comme vous pouvez le voir, nous l’avons utilisé dans le code suivant pour obtenir la date et l’heure actuelles dans la cellule A1.
Sub myMacro()
Range("A1") = Now
End Sub
Heure actuelle
Maintenant, si vous voulez obtenir l’heure actuelle uniquement au lieu de la date et de l’heure, vous devez utiliser une autre fonction « Format » ( vous pouvez en savoir plus sur cette fonction ici ) avec la fonction maintenant.
Dans le code ci-dessus, nous avons utilisé la fonction now pour fournir la valeur de la fonction de format, puis utilisé un format pour l’heure uniquement.
Sub myMacro()
Range("A1") = Format(Now, "HH:MM Am/Pm")
End Sub
Modification du format de la date d’aujourd’hui (exemple : AAAAMMJJ)
Vous pouvez également utiliser la fonction de format pour modifier le format de la date actuelle. Dans le code suivant, nous avons utilisé la fonction de format et spécifié le format comme « AAAAMMJJ ».
Sub myMacro()
Range("A1").Value = Format(Date, "YYYY/MM/DD")
End Sub
Remarque : Dans le code ci-dessus, nous avons utilisé la propriété value pour entrer la date dans la cellule A1.