In dit bericht laten we je 3 manieren zien om snel een inhoudsopgave in je Word-document in te voegen.
Tijdens het lezen van een document in Word kunt u de inhoudsopgave of het navigatievenster gebruiken om snel door de inhoud te bladeren. Maar als het om afdrukken gaat, kan het navigatievenster niet samen met het document worden afgedrukt. Maar de eerste doet. Daarom is het noodzakelijk om een inhoudsopgave in een Word-document in te voegen, vooral een lang document. Hieronder volgen 3 effectieve methoden.
Methode 1: Handmatig een inhoudsopgave invoegen
- Plaats eerst de cursor op de plaats waar u de inhoudsopgave wilt hebben. Klik op het tabblad "Verwijzingen" en vervolgens op het commando "Inhoudsopgave".
- Selecteer vervolgens “Inhoudsopgave invoegen”.

- In het geopende dialoogvenster stelt u de configuraties in zoals u nodig heeft, zoals de "Show levels".
- Klik OK".
Normaal gesproken plaatsen we de inhoudsopgave op de eerste pagina van een document. Als u eerder paginanummering hebt toegevoegd, zult u merken dat het hoofddocument nu op pagina 2 begint. In dat geval willen sommige mensen dat het hoofddocument zoals gebruikelijk op pagina 1 begint, maar dat de inhoudsopgave niet in de paginanummering wordt opgenomen. Hiervoor zijn extra handelingen nodig. Lees dit artikel voor gedetailleerde instructies: Hoe begin je met paginanummering vanaf een specifieke pagina in je Word-document?
En vergeet niet uw inhoudsopgave bij te werken na alle aanpassingen.
Methode 2: Voer Word Macro uit
Zoals u ziet, is de handmatige manier om een inhoudsopgave in te voegen een beetje vermoeiend, met zaken als het opnieuw instellen van paginanummers. Om deze reden raden we u aan om de macromanier te gebruiken om deze taak uit te voeren. Met een macro kunt u het hele proces binnen enkele seconden automatisch laten uitvoeren.
- Druk allereerst op "Ctrl+Home" om naar het begin van het document te gaan.
- Druk vervolgens op "Alt + F11" om de VBA-editor te activeren.
- Klik vervolgens op "Normaal" en vervolgens op "Invoegen".
- Kies "Module" en dubbelklik erop om het bewerkingsgebied te openen.
- Plak daar dan de volgende codes:
Sub InsertTOC()
Selection.InsertBreak Type:=wdSectionBreakNextPage
Selection.HomeKey Unit:=wdStory
With ActiveDocument
.TablesOfContents.Add Range:=Selection.Range, RightAlignPageNumbers:= _
True, UseHeadingStyles:=True, UpperHeadingLevel:=1, _
LowerHeadingLevel:=9, IncludePageNumbers:=True, AddedStyles:="", _
UseHyperlinks:=True, HidePageNumbersInWeb:=True, UseOutlineLevels:= _True
.TablesOfContents(1).TabLeader = wdTabLeaderDots
.TablesOfContents.Format = wdIndexIndent
End With
ActiveDocument.Sections(1).PageSetup.DifferentFirstPageHeaderFooter = True
With ActiveDocument.Sections(2)
.Footers(wdHeaderFooterPrimary).LinkToPrevious = False
.Footers(wdHeaderFooterPrimary).PageNumbers.RestartNumberingAtSection = True
.Footers(wdHeaderFooterPrimary).PageNumbers.StartingNumber = 1
End With
ActiveDocument.TablesOfContents(1).Update
End Sub
- Als laatste, maar niet de minste, klik op "Uitvoeren".
Na het uitvoeren van de macro wordt de nieuw ingevoegde inhoudsopgave op de eerste pagina geplaatst en begint de paginanummering op de tweede pagina. De inhoudsopgave is hiermee ook al bijgewerkt.
Methode 3: inhoudsopgaven invoegen in meerdere documenten
Als u het gemak van batchverwerking leuk vindt, gebruikt u de balgmacro:
Sub InsertTOCForMultiDoc()
Dim objDoc As Document
Dim strFile As String, strFolder As String
' Initialization
strFolder = "C:\Users\Public\Documents\New folder\Test1\"
strFile = Dir(strFolder & "*.docx", vbNormal)
' Precess each document in the folder.
While strFile <> ""
Set objDoc = Documents.Open(FileName:=strFolder & strFile)
Selection.InsertBreak Type:=wdSectionBreakNextPage
Selection.HomeKey Unit:=wdStory
With ActiveDocument
.TablesOfContents.Add Range:=Selection.Range, RightAlignPageNumbers:= _
True, UseHeadingStyles:=True, UpperHeadingLevel:=1, _
LowerHeadingLevel:=9, IncludePageNumbers:=True, AddedStyles:="", _
UseHyperlinks:=True, HidePageNumbersInWeb:=True, UseOutlineLevels:= _
True.TablesOfContents(1).TabLeader = wdTabLeaderDots
.TablesOfContents.Format = wdIndexIndent
End With
ActiveDocument.Sections(1).PageSetup.DifferentFirstPageHeaderFooter = True
With ActiveDocument.Sections(2)
.Footers(wdHeaderFooterPrimary).LinkToPrevious = False
.Footers(wdHeaderFooterPrimary).PageNumbers.RestartNumberingAtSection = True
.Footers(wdHeaderFooterPrimary).PageNumbers.StartingNumber = 1
End With
ActiveDocument.TablesOfContents(1).Update
objDoc.Save
objDoc.Close
strFile = Dir()
Wend
End Sub
Volg gewoon dezelfde stappen in methode 2 om de macro te installeren en uit te voeren.
Notes
- U moet eerst alle documenten in dezelfde directory rangschikken.
- Vergeet nooit de "C: \ Users \ Public \ Documents \ New folder \ Test1 \" te vervangen door uw daadwerkelijke mappad. Vergeet de laatste "\" niet.
Herstelprogramma voor Word
Omdat Word plotseling crasht, is het een must om een tool voor te bereiden reparatie Word en Word-documenten. Een snelle herstelprocedure kan zoveel mogelijk gegevens terughalen. Daarom is het raadzaam om vooraf een professioneel product aan te schaffen.
Auteur Introductie:
Vera Chen is een expert op het gebied van gegevensherstel in DataNumen, Inc., de wereldleider in technologieën voor gegevensherstel, waaronder Excel-oplossing en pdf reparatie softwareproducten. Voor meer informatie bezoek www.datanumen.com



