Range.InsertCrossReference (Word)
Insère un renvoi correspondant à un titre, un signet, une note de bas de page, une note de fin, ou à un élément disposant d'une étiquette de légende (comme une équation, une figure ou un tableau).
Si vous spécifiez wdPageNumber comme pour la valeur de ReferenceKind, vous devrez peut-être repaginer le document pour afficher les informations de référence croisée correctes.
InsertCrossReference (ReferenceType, ReferenceKind, ReferenceItem, InsertAsHyperlink, IncludePosition, SeparateNumbers, SeparatorString)
Set myRange = ActiveDocument.Range(Start:=0, End:=0)
myBookmarks = ActiveDocument _
.GetCrossReferenceItems(wdRefTypeBookmark)
With myRange
.InsertBefore "Page "
.Collapse Direction:=wdCollapseEnd
.InsertCrossReference ReferenceType:=wdRefTypeBookmark, _
ReferenceKind:=wdPageNumber, ReferenceItem:=myBookmarks(1)
End With
Arguments
Les arguments nommés :
ReferenceType (WdCaptionLabelID) - Le type d'élément pour lequel un renvoi doit être inséré.
Les valeurs de retour possibles sont wdCaptionEquation - Équation, wdCaptionFigure - Comprendre, wdCaptionTable - Tabulaire.
ReferenceKind (WdReferenceKind) - Informations à inclure dans le renvoi.
Ici on trouve valeurs possible pour
ReferenceItem (Long) - Si TypeRéférence a la valeur wdRefTypeBookmark, cet argument spécifie un nom de signet.
Optional arguments
Les arguments suivants sont facultatifs
InsertAsHyperlink (Boolean) - True pour insérer le renvoi sous la forme d'un lien hypertexte vers l'élément référencé.
IncludePosition (Boolean) - La valeur true à l'insertion ait lieu « au-dessus » ou « au-dessous », selon l'emplacement de l'élément de référence par rapport au renvoi.
SeparateNumbers - WdReferenceKind
Ici on trouve valeurs possible pour
SeparatorString (String) - Spécifie la chaîne à utiliser comme séparateur si le paramètre Nombresséparés prend est défini sur true.