Vue d'ensemble des fonctions de la date

Cette page présente trois façons de remplir une variable de date :

En outre, il renvoie à des pages qui couvrent toutes sortes de fonctions de date liées aux calculs :

Jour et semaine Mois Trimestre Année
Jour de la semaine - 1 = dimanche Premier jour du mois Premier jour du trimestre Année - à partir de la date
Nom de la semaineJour ou abréviations Dernier jour du mois Dernier jour du trimestre Année bissextile
Aujourd'hui, Hier, Demain Jour du mois Premier mois du trimestre Nombre de jours dans l'année
Jour suivant et jour précédent Mois - Nombre Dernier mois du trimestre Premier jour de l'année
Nom du mois Dernier jour de l'année

Réglage des valeurs de la date

Utiliser la syntaxe des constantes de date

Vous pouvez utiliser des dates fixes dans votre code VBA en plaçant la date entre # #, comme ci-dessous.


Const cdtMyDate As Date = #12/31/2001#

Créer une date à partir de l'année, du mois et du jour - DateSerial

La fonction DateSerial remplit une variable de date à partir de l'année, du mois et du jour - voir le code ci-dessous.


Dim iYear As Integer: iYear =
Dim iMonth As Integer: iMonth =
Dim iDay As Integer: iDay =
Dim dt As Date
dt = DateSerial(Year:=iYear, Month:=iMonth, Day:=iDay)

Convertir une chaîne de caractères en date - DateValue

La fonction DateValue convertit une chaîne de caractères en une date. Le code ci-dessous interprète la chaîne comme étant le 2/12/2025.


Dim strDate As String: strDate = "February 12, 2025"
Dim dt As Date
dt = DateValue(strDate)
Note
  • DateValue reconnaît l'ordre du mois, du jour et de l'année selon le format de date abrégée que vous avez spécifié pour votre système. DateValue reconnaît également les dates non ambiguës qui contiennent des noms de mois, sous forme longue ou abrégée. Par exemple, en plus de reconnaître le 30/12/1991 et le 30/12/91, DateValue reconnaît également le 30 décembre 1991 et le 30 décembre 1991.
  • Si la partie année de la date est omise, DateValue utilise l'année en cours à partir de la date système de votre ordinateur.
  • Si DateValue ne peut résoudre la chaîne en une date Erreur d'exécution '13' : Une erreur de type s'est produite

L'image ci-dessous montre le support du complément Code VBA pour les procédures VBA Date.

prise en charge des procédures VBA Date