Объект переменных (Word)

Коллекция объектов переменных , которые представляют переменные, добавленные в документ или шаблон. Переменные документа используются для сохранения настроек макросов между сеансами макросов.

Примечания

Используйте свойство Variables, чтобы вернуть коллекцию переменных . В следующем примере отображается количество переменных в документе с именем "Sales.doc".

MsgBox Documents("Sales.doc").Variables.Count & " variables"

Чтобы добавить переменную в документ, используйте метод Add . В следующем примере в активный документ добавляется переменная документа с именем "Temp" и значением 12.

ActiveDocument.Variables.Add Name:="Temp", Value:="12"

При попытке добавить переменную документа с именем, которое уже существует в коллекции переменных , возникает ошибка. Чтобы избежать этой ошибки, можно выполнить перечисление коллекции перед добавлением новых переменных. Если переменная "Синий документ" уже существует в активном документе, в следующем примере ее значение равно 6. Если этой переменной еще не существует, в данном примере она добавляется в документ и ей присваивается значение 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

Используйте переменные (Индекс), где Индекс — это имя переменной документа или номер индекса, чтобы вернуть один объект переменной . В следующем примере отображается значение переменной документа Temp в активном документе.

MsgBox ActiveDocument.Variables("Temp").Value

Номер индекса представляет позицию переменной документа в семействе переменных . Первая переменная, добавленная в коллекцию переменных, является индексом номер 1; Вторая переменная, добавляемая в коллекцию, — это индекс 2, и так далее. В следующем примере отображается имя первой переменной документа в активном документе.

MsgBox ActiveDocument.Variables(1).Name

Чтобы добавить переменную в шаблон, откройте шаблон как документ с помощью метода OpenAsDocument . В следующем примере имя пользователя (из диалогового окна "Параметры ") сохраняется в шаблоне, прикрепленном к активному документу.

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

См. также

Справочник по объектной модели Word

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.