Word) (Variables 物件
代表變數加入至文件或範本的 Variable 物件的集合。 文件變數用以保留傳來巨集的工作階段的巨集設定。
使用 Variables 屬性傳回 Variables 集合。 下列範例會示範 "Sales.doc" 文件中的變數數目。
MsgBox Documents("Sales.doc").Variables.Count & " variables"
使用 Add 方法可將變數新增至文件。 下列範例會使用的值為 12 使用中文件內名為"Temp"的文件變數。
ActiveDocument.Variables.Add Name:="Temp", Value:="12"
如果您嘗試新增名稱已經存在的文件變數在 Variables 集合中,會發生錯誤。 若要避免此錯誤,您可以列舉集合之前加入任何新的變數。 如果使用中文件已經存在藍色的文件變數,則下列範例會設定其值為 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
使用 變數 (Index),其中 Index 是文件變數的名稱或索引編號,來傳回單一 變數 物件。 下列範例顯示使用中文件內的 Temp 文件變數的值。
MsgBox ActiveDocument.Variables("Temp").Value
索引編號代表文件變數在 Variables 集合中的位置。 第一個變數加入至 Variables 集合是索引編號 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
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。