返回或设置指定对象的名称。
对于下列对象为 String 类型,可读写:AutoCorrectEntry、AutoTextEntry、ColorFormat、CustomLabel、EmailSignatureEntry、Font、FormField、ListEntry、ListTemplate、Shape、ShapeRange 和 TableOfAuthoritiesCategory;对于“应用于”列表中的其他对象为 String 类型,只读。
expression.Name
expression 必需。该表达式返回“应用于”列表中的一个对象。
本示例在活动文档中添加一个文档变量,并显示第一个文档变量的名称。
ActiveDocument.Variables.Add Name:="Temp", Value:="1"
MsgBox ActiveDocument.Variables(1).Name
本示例返回 Hello.doc 中第一个书签的名称。
abook = Documents("Hello.doc").Bookmarks(1).Name
本示例显示活动文档中窗体域的名称。
If ActiveDocument.FormFields.Count >= 1 Then
For Each FF In ActiveDocument.FormFields
FFNames = FFNames & FF.Name & vbCr
Next FF
MsgBox FFNames
End If
本示例将选定内容设置为 Arial 字体的加粗格式。
With Selection.Font
.Name = "Arial"
.Bold = True
End With
本示例将活动文档选用的第一个列表模板的名称设置为“myList”,然后在插入点添加一个 LISTNUM 域(与 myList 模板链接)。该域采用 myList 模板的格式设置。
If ActiveDocument.ListTemplates.Count >= 1 Then
ActiveDocument.ListTemplates(1).Name = "myList"
Selection.Collapse Direction:=wdCollapseEnd
ActiveDocument.Fields.Add Range:=Selection.Range, _
Type:=wdFieldListNum, Text:="myList"
End If