Objet Variables (Word)
Collection d'objets Variable qui représentent les variables ajoutées à un document ou un modèle. Les variables de document servent à conserver les paramètres de macro entre les sessions de macro.
Utilisez la propriété Variables pour renvoyer la collection Variables. L'exemple suivant affiche le nombre de variables dans le document nommé « Sales.doc ».
MsgBox Documents("Sales.doc").Variables.Count & " variables"
Utilisez la méthode Add pour ajouter une variable à un document. L'exemple suivant ajoute une variable de document nommée « Temp » avec la valeur 12 au document actif.
ActiveDocument.Variables.Add Name:="Temp", Value:="12"
Si vous essayez d'ajouter une variable de document 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 de nouvelles variables. Si la variable de document bleu existe déjà dans le document actif, l'exemple suivant définit sa valeur sur 6. Si cette variable n'existe pas déjà, cet exemple l'ajoute au document et lui affecte à 6.
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
Utiliser des Variables (Index), où Index est le nom de la variable de document ou le numéro d'index, pour renvoyer un seul objet Variable. L'exemple suivant affiche la valeur de la variable Temp dans le document actif.
MsgBox ActiveDocument.Variables("Temp").Value
Le numéro d'index représente la position de la variable de document dans la collection Variables. La première variable ajoutée à la collection Variables est le numéro d'index 1 ; la deuxième variable ajoutée à la collection est le numéro d'index 2 et ainsi de suite. L'exemple suivant affiche le nom de la première variable de document dans le document actif.
MsgBox ActiveDocument.Variables(1).Name
Pour ajouter une variable à un modèle, ouvrez le modèle en tant que document à l'aide de la méthode OpenAsDocument. L'exemple suivant stocke 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
Référence du modèle objet Word
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.