Question

返回或设置指定对象的名称。

对于下列对象为 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