Méthode Document.GetCrossReferenceItems (Word)

  • Article

Cette méthode renvoie un tableau d'éléments pouvant être renvoyés en fonction du type de renvoi spécifié.

Syntaxe

expression. GetCrossReferenceItems( _ReferenceType_ )

Expression Expression qui représente un objet Document .

Parameters

Nom Requis/Facultatif Type de données Description
ReferenceType Obligatoire Variant Type d'élément auquel vous souhaitez insérer un renvoi. Il peut s'agir d'une des constantes WdReferenceType.

Remarques

Le tableau renvoyé par cette méthode correspond aux éléments répertoriés dans la zone pour laquelle la boîte de dialogue renvoi. La valeur renvoyée par cette méthode peut être utilisée comme valeur de l'argument RéférenceQui pour la méthode InsertCrossReference de l'objet Range ou Selection.

Exemple

Cet exemple montre comment afficher le nom du premier signet du document actif qui peut faire l'objet d'un renvoi.

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

Cet exemple montre comment utilise la méthode GetCrossReferenceItems pour récupérer une liste d'en-têtes pouvant faire l'objet, puis insérer un renvoi à la page incluant l'en-tête « 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

Voir aussi

Objet Document

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.