Document.GetCrossReferenceItems - метод (Word)

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

Синтаксис

выражение. 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

См. также

Объект документа

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.