Hoe verwijdert u de voetnoot/eindnoot-scheidingslijn in een Word-document?
Wanneer u voetnoten of eindnoten invoegt in een Word-document, verschijnt er een horizontale scheidingslijn boven de tekst van de voetnoot of eindnoot. Als u deze lijn wilt verwijderen, probeer dan de methoden in dit artikel.
Verwijder voetnoot/eindnoot-scheidingslijn in Word
Verwijder voetnoot/eindnoot-scheidingslijn met VBA-code
Verwijder voetnoot/eindnoot-scheidingslijn in Word
U kunt de voetnoot- of eindnoot-scheidingslijn in Word verwijderen door de volgende stappen te volgen:
- Klik in het document waar u de voetnoot- of eindnoot-scheidingslijn wilt verwijderen op "Weergave" > "Concept".
- Klik op "Referenties" > "Noten weergeven".
- Als het document zowel voetnoten als eindnoten bevat, verschijnt er een dialoogvenster "Noten weergeven". Selecteer de gewenste weergave en klik op "OK". Kies bijvoorbeeld "Voetnootgebied weergeven".
Opmerking: Als uw document alleen voetnoten of eindnoten heeft, sla deze stap over en ga naar de volgende.
- Nu verschijnt de sectie "Noten" aan het einde van het document. Kies "Voetnootscheiding" uit de vervolgkeuzelijst "Voetnoten", selecteer de scheidingslijn en druk op de Verwijderen-toets.
- Schakel het document terug naar de weergave "Afdruklay-out".
De scheidingslijn is nu verwijderd uit het document.

Opmerking: Om de eindnoot-scheidingslijn te verwijderen, selecteert u "Eindnootgebied weergeven" in het dialoogvenster "Noten weergeven", en kies vervolgens "Eindnootscheiding" uit de vervolgkeuzelijst.
Verwijder voetnoot/eindnoot-scheidingslijnen met VBA-code
Als de handmatige methode onhandig is, kunt u de volgende VBA-code gebruiken om snel voetnoot- of zowel voetnoot- als eindnoot-scheidingslijnen te verwijderen:
- Druk in het Word-document op Alt + F11 om het venster "Microsoft Visual Basic for Applications" te openen.
- Klik in het VBA-venster op "Invoegen" > "Module", en plak vervolgens de volgende code in de module.
VBA-code: Verwijder de voetnoot-scheidingslijn uit een Word-document
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
- Druk op F5 om de code uit te voeren. Alle voetnoot-scheidingslijnen worden direct verwijderd.
Opmerking: Gebruik de volgende VBA-code als u zowel voetnoot- als eindnoot-scheidingslijnen wilt verwijderen.
VBA-code: Verwijder zowel voetnoot- als eindnoot-scheidingslijnen uit een Word-document
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 Office-productiviteitstools
Kutools for Word โ Til uw Word-ervaring naar een hoger niveau met meer dan 100 indrukwekkende functies!
๐ค Kutools AI Features: AI Assistent / Realtime Assistent / Super Polish (Opmaak behouden) / Super Vertalen (Opmaak behouden) / AI Redactie / AI Proeflezen...
๐ Documentbeheer: Pagina's opsplitsen / Documenten samenvoegen / Oplossing exporteren in diverse opmaak (PDF/TXT/DOC/HTML...) / Batch converteren naar PDF...
โ Tekst bewerken: Batch Zoeken en Vervangen in meerdere Bestanden / Formaat Wijzigen van alle Afbeeldingen / Tabel Transponeren (Rijen en Kolommen) / Tabel naar tekst converteren...
๐งน Moeiteloos schoonmaken: Veeg extra Spaties weg / Sectie-einden / Tekstvak / Hyperlinks / Voor meer Verwijderen-tools, bezoek de Verwijderen-groep...
โ Creatieve invoegingen: Duizendtalscheidingsteken invoegen / Selectievakje / Keuzerondje / QR-code / Barcode / Meerdere Afbeeldingen / Ontdek meer bij de Invoegen-groep...
๐ Precieze Selecties: Specifieke pagina's selecteren / Referentietabel / Vorm / Kopalinea / Verbeter navigatie met meer Selecteren -functies...
โญ Ster-upgrades: Navigeer naar elk Bereik / Herhaal tekst automatisch invoegen / Wissel tussen Document-vensters /11 Conversie-tools...
๐ Ondersteunt meer dan40 Talen: Gebruik Kutools in uw gewenste taal โ ondersteunt Engels, Spaans, Duits, Frans, Chinees en meer dan40 anderen!

โจ Kutools for Office โ รรฉn installatie, vijf krachtige tools!
Inclusief Office Tab Pro ยท Kutools for Excel ยท Kutools for Outlook ยท Kutools for Word ยท Kutools for PowerPoint
๐ฆ Krijg alle5 tools in รฉรฉn pakket | ๐ Naadloze integratie met Microsoft Office | โก Bespaar tijd en verhoog direct uw productiviteit
Beste Office-productiviteitstools
Kutools for Word โ 100+ tools voor Word
- ๐ค Kutools AI Features: AI Assistent / Realtime Assistent / Super Polish / Super Vertalen / AI Redactie / AI Proeflezen
- ๐ Documentbeheer: Pagina's opsplitsen / Documenten samenvoegen / Batch converteren naar PDF
- โ Tekst bewerken: Batch Zoeken en Vervangen / Formaat Wijzigen van alle Afbeeldingen
- ๐งน Moeiteloos schoonmaken: Verwijder extra spaties / Verwijder sectie-einden
- โ Creatieve invoegingen: Duizendtalscheidingsteken invoegen / Selectievakje invoegen / QR-codes maken
- ๐ Ondersteunt meer dan40 Talen: Kutools spreekt uw taal โ meer dan40 talen ondersteund!