通过

Document.GetCrossReferenceItems 方法 (Word)

  • 项目

返回一个项目数组，根据指定的交叉引用类型可对该数组中的项目进行交叉引用。

语法

expression。 GetCrossReferenceItems( _ReferenceType_ )

表达 一个表示 Document 对象的表达式。

参数

名称 必需/可选 数据类型 说明
ReferenceType 必需 Variant 要在其中插入交叉引用的项目类型。 可以是任何 WdReferenceType 常量。

备注

此方法返回的数组对应于在 交叉引用对话框中的 其框中列出的项目。 此方法返回的值用作该 区域 或 选定内容 的对象的 InsertCrossReference 方法的 ReferenceWhich 参数的值。

示例

本示例显示活动文档中第一个可以进行交叉引用的书签名称。

If ActiveDocument.Bookmarks.Count >= 1 Then 
 myBookmarks = ActiveDocument.GetCrossReferenceItems( _ 
 wdRefTypeBookmark) 
 MsgBox myBookmarks(1) 
End If

本示例使用 GetCrossReferenceItems 方法来检索可以进行交叉引用的标题的列表，然后插入交叉引用页，其中包含标题"简介"。

myHeadings = _ 
 ActiveDocument.GetCrossReferenceItems(wdRefTypeHeading) 
For i = 1 To Ubound(myHeadings) 
 If Instr(LCase$(myHeadings(i)), "introduction") Then 
 Selection.InsertCrossReference _ 
 ReferenceType:=wdRefTypeHeading, _ 
 ReferenceKind:=wdPageNumber, ReferenceItem:=i 
 Selection.InsertParagraphAfter 
 End If 
Next i

另请参阅

Document 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。