Selection.InsertCrossReference-Methode (Word)

Fügt einen Querverweis zu einer Überschrift, Textmarke, Fußnote oder Endnote oder zu einem Element, für das eine Beschriftungskategorie definiert wurde (z. B. eine Gleichung, Abbildung oder Tabelle), ein.

Syntax

Ausdruck. InsertCrossReference( _ReferenceType_ , _ReferenceKind_ , _ReferenceItem_ , _InsertAsHyperlink_ , _IncludePosition_ , _SeparateNumbers_ , _SeparatorString_ )

Ausdruck: Erforderlich. Eine Variable, die ein Selection-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
ReferenceType Erforderlich Variant Der Typ des Elements, für den ein Querverweis eingefügt werden soll. Dabei kann es sich um eine WdReferenceType-Konstante oder eine WdCaptionLabelID-Konstante oder eine benutzerdefinierte Beschriftungskategorie handeln.
ReferenceKind Erforderlich WdReferenceKind Die Informationen, die in dem Querverweis eingeschlossen sein sollen.
ReferenceItem Erforderlich Variant Wenn für ReferenceType der Wert wdRefTypeBookmark festgelegt ist, gibt dieses Argument den Namen einer Textmarke an. Für alle anderen ReferenceType-Werte gibt dieses Argument die Nummer oder den Namen des Elements im Feld Verweistyp des Dialogfelds Querverweis an. Mit der GetCrossReferenceItems-Methode geben Sie eine Liste mit Elementnamen zurück, die mit diesem Argument verwendet werden können.
InsertAsHyperlink Optional Variant True, wenn der Querverweis als Hyperlink eingefügt werden soll.
IncludePosition Optional Variant True, um die Einfügung in Abhängigkeit von der Position des Referenzelements im Verhältnis zum Querverweis "darüber" oder "darunter" vorzunehmen.
SeparateNumbers Optional Variant True, um ein Trennzeichen zum Trennen der Zahlen vom dazugehörigen Text zu verwenden. (Verwenden Sie diesen Wert nur, wenn der Parameter ReferenceType auf wdRefTypeNumberedItem und der Parameter ReferenceKind auf wdNumberFullContext festgelegt ist.)
SeparatorString Optional Variant Gibt die Zeichenfolge an, die als Trennzeichen verwendet werden soll, wenn der Parameter SeparateNumbers auf True festgelegt ist.

HinwBemerkungeneise

Wenn Sie wdPageNumber für den Wert von ReferenceKind angeben, müssen Sie das Dokument möglicherweise neu konfigurieren, um die richtigen Querverweisinformationen anzuzeigen.

Beispiel

In diesem Beispiel wird ein Satz mit zwei Querverweisen eingefügt: ein Querverweis auf den Text einer Überschrift und ein Verweis auf die Seite, auf der die Überschrift angezeigt wird.

With Selection 
 .Collapse Direction:=wdCollapseStart 
 .InsertBefore "For more information, see " 
 .Collapse Direction:=wdCollapseEnd 
 .InsertCrossReference ReferenceType:=wdRefTypeHeading, _ 
 ReferenceKind:=wdContentText, ReferenceItem:=1 
 .InsertAfter " on page " 
 .Collapse Direction:=wdCollapseEnd 
 .InsertCrossReference ReferenceType:=wdRefTypeHeading, _ 
 ReferenceKind:=wdPageNumber, ReferenceItem:=1 
 .InsertAfter "." 
End With

Siehe auch

Selection-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.