Ga naar hoofdinhoud

Hoe selecteer ik alle koptekst-alinea's in Word?

Soms moeten we alle alinea's met koppen verwijderen of bewerken. De eerste stap is om alle kopparagrafen te selecteren. In deze tutorial leer je de volgende methoden om alle alinea's met koppen te selecteren.

Selecteer alle kopparagrafen met Zoeken en vervangen

Selecteer alle kopparagrafen met de VBA

Selecteer alle kopparagrafen met de Kutool voor Word

Aanbevolen productiviteitstools voor Word

Kutools for Word: AI integreren 🤖besparen meer dan 100 geavanceerde functies 50% van uw documentverwerkingstijd.Gratis download

Office Tab: introduceert de browserachtige tabbladen in Word (en andere Office-hulpmiddelen), waardoor de navigatie tussen meerdere documenten wordt vereenvoudigd.Gratis download


pijl blauw rechts belSelecteer alle kopparagrafen met Zoeken en vervangen

Office-tabblad: Brengt interfaces met tabbladen naar Word, Excel, PowerPoint...
ot woord middelste advertentie 100
Verbeter nu uw workflow.      Lees meer       Gratis download

De functie Zoeken en vervangen in woorden is de meest gebruikelijke manier om alle alinea's met koppen te selecteren.

Stap 1: klik op Home >VIND DE PLEK DIE PERFECT VOOR JOU IS in en selecteer het Geavanceerd zoeken Mark

Stap 2: klik op Meer knop om meer zoekopties weer te geven;

doc-select-kop-alinea-1

Stap 3: klik op Formaat markeer de onderstaande pop-upopties.

doc-select-kop-alinea-2

Stap 4: klik op de Style om de te selecteren kopstijl die u hebt gebruikt in het dialoogvenster Zoeken naar welke stijl.

doc-select-kop-alinea-3

Opmerking: deze methode kan elke keer slechts één koptekst selecteren. Het is tijdrovend om alle alinea's in de koptekst te bewerken.


pijl blauw rechts belSelecteer alle kopparagrafen met de VBA

Als alternatief kunnen we de VBA gebruiken om alle koppenparagrafen te selecteren.

Stap 1: druk op "Alt-F11" om het Microsoft Visual Basic for Application-venster te openen;

Stap 2: klik op Module op de Invoegen tab, kopieer en plak de volgende VBA-code in het modulevenster;

Stap 3: Klik vervolgens op lopendoc-reverse-teken-6 knop om de VBA toe te passen.

De VBA-code om alle kopparagrafen te selecteren:

Sub SelectHeadingParagraphs ()
Dim tempTable As Paragraaf
Application.ScreenUpdating = False
ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
Voor elke tempTable in ActiveDocument.Paragraphs
'Debug.Print tempTable.Range.Style & "" & wdStyleHeading2
Als tempTable.Style = ActiveDocument.Styles (wdStyleHeading2) Dan
'Debug.Print "aaa"
tempTable.Range.Editors.WdEditorEveryone toevoegen
End If
Volgende
ActiveDocument.SelectAllEditableRanges wdEditorEveryone
ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
Application.ScreenUpdating = True
End Sub

Notitie : deze methode neemt Heading2 als voorbeeld. Heading2 kan veranderen in andere kopstijlen.


pijl blauw rechts belSelecteer alle kopparagrafen met de Kutool voor Word

Is er een gemakkelijkere manier om alle alinea's met koppen te selecteren? Kutool voor Word is uw beste keuze. Nadat u de Kutool voor Word heeft geïnstalleerd, kunt u met één klik alle koppen (kopparagrafen) selecteren.

Kutools for Word, een handige invoegtoepassing, bevat groepen tools om uw werk te vergemakkelijken en uw vermogen om Word-documenten te verwerken te verbeteren. Gratis proefperiode van 45 dagen! Snap het nu!

Klik Kutools >Alinea selecteren in de groep Alinea selecteren. Zie screenshot

doc-select-kop-alinea-4

Voor meer gedetailleerde informatie over Selecteer Kop alinea's van Kutools for Word, ga naar: Alinea selecteren functiebeschrijving


Beste Office-productiviteitstools

Kutools for Word - Verbeter uw woordervaring met Over 100 Opmerkelijke kenmerken!

🤖 Kutools AI-assistent: Transformeer uw schrijven met AI - Inhoud genereren  /  Herschrijf tekst  /  Documenten samenvatten  /  Informeer voor informatie gebaseerd op document, allemaal binnen Word

📘 Documentbeheersing: Pagina's splitsen  /  Voeg documenten samen  /  Selectie exporteren in verschillende formaten (PDF/TXT/DOC/HTML...)  /  Batchconversie naar PDF  /  Pagina's exporteren als afbeeldingen  /  Meerdere bestanden tegelijk afdrukken...

Inhoud bewerken: Batch zoeken en vervangen over meerdere bestanden  /  Formaat van alle afbeeldingen wijzigen  /  Tabelrijen en -kolommen transponeren  /  Converteer tabel naar tekst...

🧹 Moeiteloos schoon: Veeg weg Extra ruimtes  /  Sectie-onderbrekingen  /  Alle koppen  /  Tekstvakken  /  hyperlinks  / Ga voor meer verwijdergereedschappen naar onze Groep verwijderen...

Creatieve invoegingen: Invoegen Duizend scheidingstekens  /  Vink vakjes aan  /  Radio knoppen  /  QR Code  /  Barcode  /  Diagonale lijntabel  /  Vergelijking bijschrift  /  Bijschrift bij afbeelding  /  Tabel titel  /  Meerdere afbeeldingen  / Ontdek meer in de Groep invoegen...

???? Precisieselecties: Vaststellen specifieke pagina's  /  tafels  /  vormen  /  kop paragrafen  / Verbeter de navigatie met meer Selecteer functies...

Sterverbeteringen: Navigeer snel naar elke locatie  /  automatisch herhaalde tekst invoegen  /  naadloos schakelen tussen documentvensters  /  11 Conversiehulpmiddelen...

👉 Wil je deze functies proberen? Kutools voor Word biedt een Gratis proefperiode van 60-dag, zonder beperkingen! 🚀
 
Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
This is very useful definitely, thank you very much. Is there a way to add bold text in the selection? what would be the best way to change line 7? I want to get all headings and also all keywords in normal text that are marked bold in the text.
This comment was minimized by the moderator on the site
Thanks, this is very useful. I wanted to select all instances of all Headings at once, so I changed line 7 to this:
If tempTable.OutlineLevel <> wdOutlineLevelBodyText Then
This comment was minimized by the moderator on the site
Thanks, this is very useful. I wanted to select all instances of Heading1 and Heading2 at once, so I changed line 7 to this: If (tempTable.Style = ActiveDocument.Styles(wdStyleHeading1)) Or (tempTable.Style = ActiveDocument.Styles(wdStyleHeading2)) Then
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations