Peter schreibt Handbücher und kann das Inhaltsverzeichnis eines Kapitels auf normale Weise automatisch generieren. Auf diese Weise können Leser auf einen Inhaltsverzeichniseintrag klicken und zur Überschrift springen. Es gibt jedoch keine Möglichkeit, auf die Überschrift zu klicken und zum Inhaltsverzeichnis zurückzukehren. Damit die Leser dies tun können, muss Peter einzeln einen Hyperlink auf die Überschrift anwenden und dann die Unterstreichung entfernen, die er als unansehnlich empfindet. Das Kapitel eines Handbuchs kann Hunderte von Überschriften enthalten, sodass die Aufgabe, die Hyperlinks einzeln anzuwenden, schmerzhaft sein kann. Peter fragt sich, ob es eine Möglichkeit gibt, das Hinzufügen von Hyperlinks zu Überschriften nach Bedarf zu automatisieren.

Peters Ansatz ist zwar gut gemeint, aber völlig unnötig.

Word bietet eine Möglichkeit, auf eine Überschrift im Inhaltsverzeichnis zu klicken (die Peter kennt) und dann zu dieser Überschrift im Inhaltsverzeichnis zurückzukehren (die Peter anscheinend nicht kennt). Die spezielle Verknüpfung zum Ausführen dieser Aufgabe lautet Alt + Pfeil nach links. Die Verknüpfung springt dorthin zurück, wo Sie waren, bevor Sie auf den Hyperlink im Inhaltsverzeichnis geklickt haben. Dies macht ihn ideal für lange Inhaltsverzeichnisse. Sie kehren genau dorthin zurück, wo Sie waren, und nicht zum Anfang des Inhaltsverzeichnisses.

Die Tastenkombination ist die beste Lösung für Leser. Es funktioniert standardmäßig bei einer Standard-Word-Installation. Falls gewünscht, können Sie Ihrem Link jedoch eine Schaltfläche „Zurück“ hinzufügen: / wordribbon-Adding_Tools_to_the_Quick_Access_Toolbar [Symbolleiste für den Schnellzugriff], auf die Sie klicken können, um zum Ausgangspunkt des Inhaltsverzeichnisses zurückzukehren. Befolgen Sie diese Schritte:

  1. Zeigen Sie das Dialogfeld Word-Optionen an. (Klicken Sie in Word 2007 auf die Schaltfläche Office und dann auf Word-Optionen. Zeigen Sie in Word 2010 oder einer späteren Version die Registerkarte Datei des Menübands an und klicken Sie dann auf Optionen.)

  2. Klicken Sie auf der linken Seite des Dialogfelds auf Anpassen (Word 2007) oder Symbolleiste für den Schnellzugriff (spätere Versionen von Word). (Siehe Abbildung 1.)

  3. Verwenden Sie die Dropdown-Liste Befehle auswählen aus, und wählen Sie Alle Befehle aus.

  4. Suchen Sie in der Befehlsliste den Befehl Zurück und wählen Sie ihn aus.

  5. Klicken Sie auf die Schaltfläche Hinzufügen. Der Befehl Zurück wird jetzt rechts im Dialogfeld in der Liste der Befehle der Symbolleiste für den Schnellzugriff angezeigt.

  6. Verwenden Sie die Aufwärts- und Abwärtspfeiltasten, um den Befehl Zurück in den Befehlen der Symbolleiste für den Schnellzugriff zu positionieren.

  7. OK klicken.

Der Befehl Zurück, der jetzt in der Symbolleiste für den Schnellzugriff angezeigt wird, hat genau die gleiche Funktion wie die Tastenkombination Alt + Pfeil nach links.

Wenn Sie Überschriften weiterhin Hyperlinks hinzufügen möchten, können Sie den Prozess nur mithilfe eines Makros automatisieren. Das folgende Makro durchläuft jeden Eintrag im ersten Inhaltsverzeichnis des Dokuments, findet die referenzierte Überschrift im Hauptteil des Textes und fügt dann einen Hyperlink zurück zum Inhaltsverzeichnis hinzu.

Sub HyperlinkHeadings()

Dim hyp As Hyperlink     Dim toc As TableOfContents     Dim k As Long     Dim bkmk As String     Dim sCode As String     Dim fld As Field     Dim aRange As Range

If ActiveDocument.TablesOfContents.Count = 0 Then         MsgBox "There are no Tables of Contents in document"

Exit Sub     End If

Set toc = ActiveDocument.TablesOfContents(1)



For Each fld In toc.Range.Fields         sCode = fld.Code.Text         If InStr(sCode, "HYPERLINK") > 0 Then             bkmk = Mid(sCode, InStr(sCode, "_"))

bkmk = Left(bkmk, Len(bkmk) - 2)

fld.Select             ActiveDocument.Bookmarks.Add Range:=Selection.Range, _               Name:=bkmk & "R"



Set aRange = ActiveDocument.Bookmarks(bkmk).Range             aRange.Select             With ActiveDocument.Hyperlinks.Add(Anchor:=Selection.Range, _                 Address:="", SubAddress:=bkmk & "R", _                   TextToDisplay:=Selection.Text)

.Range.Select                 Selection.ClearCharacterAllFormatting             End With         End If     Next fld

Options.CtrlClickHyperlinkToOpen = False End Sub

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der WordTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

WordTips ist Ihre Quelle für kostengünstige Microsoft Word-Schulungen.

(Microsoft Word ist die weltweit beliebteste Textverarbeitungssoftware.) Dieser Tipp (13059) gilt für Microsoft Word 2007, 2010, 2013, 2016, 2019 und Word in Office 365.