Zum Hauptinhalt springen

Entdecken Sie noch heute die neue, kostenlose Version von Kutools für Outlook!

Wie entfernt man die Fußnoten-/Endnotentrennlinie in einem Word-Dokument?

Author: Siluvia Last Modified: 2025-05-28

Wenn Sie Fußnoten oder Endnoten in einem Word-Dokument einfügen, erscheint eine horizontale Trennlinie über dem Text der Fußnote oder Endnote. Wenn Sie diese Linie entfernen möchten, probieren Sie die Methoden in diesem Artikel aus.

Fußnoten-/Endnotentrennlinie in Word entfernen

Fußnoten-/Endnotentrennlinie mit VBA-Code entfernen

Fußnoten-/Endnotentrennlinie in Word entfernen

Sie können die Fußnoten- oder Endnotentrennlinie in Word durch folgende Schritte entfernen:

  1. Klicken Sie im Dokument, in dem Sie die Fußnoten- oder Endnotentrennlinie entfernen möchten, auf „Ansicht“ > „Entwurf“.
    Draft button on the View tab on the ribbon
  2. Klicken Sie auf „Referenzen“ > „Noten anzeigen“.
    Show Notes on the References tab on the ribbon
  3. Wenn das Dokument sowohl Fußnoten als auch Endnoten enthält, wird ein Dialogfeld „Noten anzeigen“ angezeigt. Wählen Sie die gewünschte Ansicht aus und klicken Sie dann auf „OK“. Zum Beispiel wählen Sie „Fußnotenbereich anzeigen“.
    Show Notes dialog box

    Hinweis: Wenn Ihr Dokument nur Fußnoten oder nur Endnoten enthält, überspringen Sie diesen Schritt und gehen Sie zum nächsten.

  4. Jetzt erscheint der Abschnitt „Noten“ am Ende des Dokuments. Wählen Sie „Fußnotentrenner“ aus dem Dropdown-Menü „Fußnoten“, markieren Sie die Trennlinie und drücken Sie die Entf-Taste.
    The separator line is selected
  5. Wechseln Sie das Dokument zurück zur Ansicht „Drucklayout“.
    The button to shift to the Print Layout view

Die Trennlinie wurde nun aus dem Dokument entfernt.

The separator line of footnote is removed

Hinweis: Um die Endnotentrennlinie zu entfernen, wählen Sie „Endnotenbereich anzeigen“ im Dialogfeld „Noten anzeigen“ und dann „Endnotentrenner“ aus der Dropdown-Liste.

Fußnoten-/Endnotentrennlinien mit VBA-Code entfernen

Falls die manuelle Methode umständlich ist, können Sie den folgenden VBA-Code verwenden, um die Fußnotentrennlinien oder sowohl die Fußnoten- als auch die Endnotentrennlinien schnell zu entfernen:

  1. Drücken Sie in dem Word-Dokument Alt + F11, um das Fenster „Microsoft Visual Basic for Applications“ zu öffnen.
  2. Klicken Sie im VBA-Fenster auf „Einfügen“ > „Modul“ und fügen Sie dann den folgenden Code in das Modul ein.
    Module window opened in the VBA window

    VBA-Code: Fußnotentrennlinie aus einem Word-Dokument entfernen

    Sub DeleteTheFootnoteSeparator()
'Updated by ExtendOffice 20181112
    If ActiveDocument.Footnotes.Count < 1 Then Exit Sub
    If ActiveWindow.View.SplitSpecial = wdPaneNone Then
        ActiveWindow.ActivePane.View.Type = wdNormalView
    Else
        ActiveWindow.View.Type = wdNormalView
    End If
    With ActiveWindow.ActivePane.View
        If .Type = wdPrintView Or .Type = wdWebView Or _
        .Type = wdPrintPreview Then
            ActiveWindow.View.SeekView = wdSeekFootnotes
        Else
            ActiveWindow.View.SplitSpecial = wdPaneFootnotes
        End If
    End With
    ActiveWindow.View.SplitSpecial = wdPaneFootnoteSeparator
    With Selection
        .MoveRight Unit:=wdCharacter
        .TypeBackspace
        .TypeBackspace
    End With
    ActiveWindow.View.SplitSpecial = wdPaneFootnoteContinuationSeparator
    With Selection
        .MoveRight Unit:=wdCharacter, Count:=1
        .TypeBackspace
        .TypeBackspace
        With .ParagraphFormat
            .LineSpacingRule = wdLineSpaceMultiple
            .LineSpacing = LinesToPoints(0.06)
        End With
    End With
    ActiveWindow.View.Type = wdPrintView
End Sub
  3. Drücken Sie F5, um den Code auszuführen. Alle Fußnotentrennlinien werden sofort entfernt.

Hinweis: Verwenden Sie den folgenden VBA-Code, wenn Sie sowohl die Fußnoten- als auch die Endnotentrennlinien entfernen möchten.

VBA-Code: Fußnoten- und Endnotentrennlinien aus einem Word-Dokument entfernen

Sub DeleteTheFootnoteSeparator()
'Updated by ExtendOffice 20181112
    If ActiveDocument.Footnotes.Count < 1 Then Exit Sub
    If ActiveWindow.View.SplitSpecial = wdPaneNone Then
        ActiveWindow.ActivePane.View.Type = wdNormalView
    Else
        ActiveWindow.View.Type = wdNormalView
    End If
    With ActiveWindow.ActivePane.View
        If .Type = wdPrintView Or .Type = wdWebView Or _
        .Type = wdPrintPreview Then
            ActiveWindow.View.SeekView = wdSeekFootnotes
        Else
            ActiveWindow.View.SplitSpecial = wdPaneFootnotes
        End If
    End With
    ActiveWindow.View.SplitSpecial = wdPaneFootnoteSeparator
    With Selection
        .MoveRight Unit:=wdCharacter
        .TypeBackspace
        .TypeBackspace
    End With
    ActiveWindow.View.SplitSpecial = wdPaneFootnoteContinuationSeparator
    With Selection
        .MoveRight Unit:=wdCharacter, Count:=1
        .TypeBackspace
        .TypeBackspace
        With .ParagraphFormat
            .LineSpacingRule = wdLineSpaceMultiple
            .LineSpacing = LinesToPoints(0.06)
        End With
    End With
    ActiveWindow.View.SplitSpecial = wdPaneEndnoteSeparator
    With Selection
        .MoveRight Unit:=wdCharacter
        .TypeBackspace
        .TypeBackspace
    End With
    ActiveWindow.View.SplitSpecial = wdPaneEndnoteContinuationSeparator
    With Selection
        .MoveRight Unit:=wdCharacter, Count:=1
        .TypeBackspace
        .TypeBackspace
        With .ParagraphFormat
            .LineSpacingRule = wdLineSpaceMultiple
            .LineSpacing = LinesToPoints(0.06)
        End With
    End With
    ActiveWindow.View.Type = wdPrintView
End Sub

Beste Büroproduktivitätswerkzeuge

Kutools für Word - Verbessern Sie Ihr Word-Erlebnis mit über 100 bemerkenswerten Funktionen!

🤖 Kutools AI-Funktionen: KI-Assistent / Echtzeit-Assistent / Super Polieren (Format beibehalten) / Super Übersetzen (Format beibehalten) / KI-Redaktion / KI Korrekturlesen...

📘 Dokumentenbeherrschung: Seiten teilen / Dokumente zusammenführen / Auswahl in verschiedenen Formaten exportieren (PDF/TXT/DOC/HTML...) / Stapelweise in PDF konvertieren...

✏ Inhaltsbearbeitung: Stapelweise Suchen und Ersetzen in mehreren Dateien / Alle Bilder skalieren / Zeilen und Spalten der Tabelle transponieren / Tabelle in Text umwandeln...

🧹 Müheloses Reinigen: Zusätzliche Leerzeichen entfernen / Abschnittsumbrüche / Textfelder / Hyperlinks / Für weitere Entfernungstools gehen Sie zur Entfernen-Gruppe...

➕ Kreative Einfügungen: Tausendertrennzeichen einfügen / Kontrollkästchen / Optionsfelder / QR-Code / Barcode / Mehrere Bilder / Entdecken Sie mehr in der Einfügen-Gruppe...

🔍 Präzise Auswahlen: Bestimmte Seiten / Tabellen / Formen / Überschriftenabsätze / Verbessern Sie die Navigation mit mehr Auswahlfunktionen ...

⭐ Sterneverbesserungen: Zu jedem Standort navigieren / Automatisches Einfügen von wiederholtem Text / Wechsel zwischen Dokumentfenstern /11 Konvertierungswerkzeuge...

Kutools and Kutools Plus tabs on the Word Ribbon
👉 Möchten Sie diese Funktionen ausprobieren? Laden Sie Kutools für Word jetzt herunter! 🚀
 

Beste Büroproduktivitätswerkzeuge

Kutools für Word - 100+ Werkzeuge für Word

Kostenloser Download Jetzt kaufen Erfahren Sie mehr über Kutools