Objeto Variables (Word)
Una colección de objetos Variable que representa las variables agregadas a un documento o plantilla. Las variables de documento se usan para conservar la configuración de la macro entre sesiones de macros.
Utilice la propiedad Variables para devolver la colección de Variables. El ejemplo siguiente muestra el número de variables en el documento denominado "Sales.doc".
MsgBox Documents("Sales.doc").Variables.Count & " variables"
Utilice el método Add para agregar una variable a un documento. En el siguiente ejemplo se agrega una variable de documento denominada "Temp" con un valor de 12 al documento activo.
ActiveDocument.Variables.Add Name:="Temp", Value:="12"
Si intenta agregar una variable de documento con un nombre que ya existe en la colección Variables, se produce un error. Para evitar este error, puede enumerar la colección antes de agregar nuevas variables. Si la variable de documento azul ya existe en el documento activo, en el siguiente ejemplo se establece su valor en 6. Si esta variable no existe, este ejemplo lo agrega al documento y lo establece en 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
Utilice Variables (Index), donde Index es el nombre de la variable de documento o número de índice, para devolver un solo objeto Variable. El ejemplo siguiente muestra el valor de la variable de documento Temp del documento activo.
MsgBox ActiveDocument.Variables("Temp").Value
El número de índice representa la posición de la variable de documento en la colección Variables. La primera variable agregada a la colección de Variables es el número de índice 1; la segunda variable agregada a la colección es el número de índice 2 y así sucesivamente. El ejemplo siguiente muestra el nombre de la primera variable de documento en el documento activo.
MsgBox ActiveDocument.Variables(1).Name
Para agregar una variable a una plantilla, abra la plantilla como un documento mediante el método OpenAsDocument. En el siguiente ejemplo se almacena el nombre de usuario (del cuadro de diálogo Opciones ) en la plantilla adjunta al documento activo.
ScreenUpdating = False
With ActiveDocument.AttachedTemplate.OpenAsDocument
.Variables.Add Name:="UserName", Value:= Application.UserName
.Close SaveChanges:=wdSaveChanges
End With
Referencia de modelos de objetos de Word
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.