Метод Document.GetCrossReferenceItems (Word)

Статья
04/07/2023

Возвращает массив элементов, на которые можно ссылаться на основе указанного типа перекрестной ссылки.

Синтаксис

выражение. GetCrossReferenceItems( _ReferenceType_ )

Выражение Выражение, представляющее объект Document .

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
ReferenceType	Обязательный	Variant	Тип элемента, на который нужно вставить перекрестную ссылку. Может быть любой константой WdReferenceType .

Замечания

Массив, возвращаемый этим методом, соответствует элементам, перечисленным в поле Для которого диалогового окна Перекрестная ссылка . Значение, возвращаемое этим методом, можно использовать в качестве значения аргумента ReferenceWhich для метода InsertCrossReference объекта Range или Selection .

Пример

В этом примере отображается имя первой закладки в активном документе, на которую можно ссылаться.

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 и обратная связь.