共用方式為

Word) (Document.GetCrossReferenceItems 方法

  • 發行項

根據指定的交互參照類型，傳回可交互參照的項目陣列。

語法

expression。 GetCrossReferenceItems( _ReferenceType_ )

表達 表示 Document 物件的運算式。

參數

名稱 必要/選用 資料類型 描述
ReferenceType 必要 Variant 您想要將交互參照插入其中的項目類型。 它可以為任何 WdReferenceType 常數。

註解

此方法會傳回的陣列會對應至 交互參照] 對話方塊中 的方塊中列出的項目。 此方法所傳回的值可以做為 Range 或 Selection 物件的 InsertCrossReference 方法的 ReferenceWhich 引數的值。

範例

這則範例會顯示使用中文件內可交互參照之第一個書籤的名稱。

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

本範例會使用 GetCrossReferenceItems 方法來擷取可交互參照的標題清單，然後插入交互參照] 頁面上含有標題"Introduction"。

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 支援與意見反應。