Variables.Add, méthode (Word)

Renvoie un objet Variable qui représente une variable ajoutée à un document.

Syntaxe

expression. Ajouter (Nom, Valeur)

expression Obligatoire. Variable qui représente une collection « Variables ».

Parameters

Nom	Requis/Facultatif	Type de données	Description
Name	Obligatoire	Chaîne	Nom de la variable.
Value	Facultatif	Variant	Valeur de la variable.

Valeur renvoyée

Variable

Remarques

Les variables de document sont invisibles pour l'utilisateur, sauf si un champ DOCVARIABLE est inséré avec le nom de la variable approprié. Si vous essayez d'ajouter une variable avec un nom qui existe déjà dans la collection Variables, une erreur se produit. Pour éviter cette erreur, vous pouvez énumérer la collection avant d'ajouter une nouvelle variable à celui-ci.

Exemple

Cet exemple montre comment ajouter une variable dénommée « Temp » au document actif, puis comment insérer un champ « DocVariable » afin d'afficher la valeur de la variable Temp.

With ActiveDocument 
 .Variables.Add Name:="Temp", Value:="12" 
 .Fields.Add Range:=Selection.Range, _ 
 Type:=wdFieldDocVariable, Text:="Temp" 
End With 
ActiveDocument.ActiveWindow.View.ShowFieldCodes = False

Cet exemple montre comment affecter la valeur six à la variable « Blue ». Si cette variable n'existe pas déjà, l'exemple montre comment l'ajouter au document et lui attribuer la valeur six.

For Each aVar In ActiveDocument.Variables 
 If aVar.Name = "Blue" Then num = aVar.Index 
Next aVar 
If num = 0 Then 
 ActiveDocument.Variables.Add Name:="Blue", Value:=6 
Else 
 ActiveDocument.Variables(num).Value = 6 
End If

Cet exemple montre comment stocker le nom d'utilisateur (à partir de la boîte de dialogue Options) dans le modèle attaché au document actif.

ScreenUpdating = False 
With ActiveDocument.AttachedTemplate.OpenAsDocument 
 .Variables.Add Name:="UserName", Value:= Application.UserName 
 .Close SaveChanges:=wdSaveChanges 
End With

Voir aussi

Variables, Collection d'objets

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.