Méthode Range.InsertDateTime (Word)

Insère la date et/ou l'heure courante sous forme de texte ou de champ TIME.

Syntaxe

expression. InsertDateTime (DateTimeFormat, InsertAsField, InsertAsFullWidth, DateLanguage, CalendarType)

expression Obligatoire. Variable qui représente un objet Range.

Parameters

Nom Requis/Facultatif Type de données Description
DateTimeFormat Facultatif Variant Format à utiliser pour afficher la date et/ou l'heure. Si vous ne spécifiez pas cet argument, Microsoft Word utilise le style date au format abrégé à partir du Panneau de configuration de Windows (icône Paramètres régionaux).
InsertAsField Facultatif Variant True pour insérer les informations spécifiées en tant que champ TIME. La valeur par défaut est True.
InsertAsFullWidth Facultatif Variant True pour insérer les informations spécifiées en tant que codés sur deux chiffres. Cet argument n'est peut-être pas disponible, en fonction de la prise en charge de langue (anglais (États-Unis), par exemple) que vous avez sélectionnée ou installée.
DateLanguage Facultatif Variant Définit la langue dans laquelle afficher la date ou l'heure. Peut être l'une des constantes WdDateLanguag. Cet argument n'est peut-être pas disponible, en fonction de la prise en charge de langue (anglais (États-Unis), par exemple) que vous avez sélectionnée ou installée.
CalendarType Facultatif Variant Définit le type de calendrier à utiliser lors de l'affichage de la date ou l'heure. Peut être l'une des constantes WdCalendarTypeBi. Cet argument n'est peut-être pas disponible, en fonction de la prise en charge de langue (anglais (États-Unis), par exemple) que vous avez sélectionnée ou installée.

Exemple

Cet exemple montre comment insérer la date actuelle à la fin du document actif. Un résultat possible peut être « 01/12/99 ».

With ActiveDocument.Content 
 .Collapse Direction:=wdCollapseEnd 
 .InsertDateTime DateTimeFormat:="MM/dd/yy", _ 
 InsertAsField:=False 
End With

Cet exemple montre comment insérer dans le pied de page du document actif un champ TIME qui correspond à la date du jour.

ActiveDocument.Sections(1).Footers(wdHeaderFooterPrimary).Range _ 
 .InsertDateTime DateTimeFormat:="MMMM dd, yyyy", _ 
 InsertAsField:=True

Voir aussi

Range, objet

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.