Note: The other languages of the website are Google-translated. Back to English

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


pijl blauw rechts belSelecteer alle kopparagrafen met Zoeken en vervangen

Verbazingwekkend! Gebruik efficiënte tabbladen in Word (Office) zoals Chrome, Firefox en New Internet Explorer!

Meer details Vrij Downloaden

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 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 stijl 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



Aanbevolen Word-productiviteitstools

 

Kutools For Word - Meer dan 100 geavanceerde functies voor Word, bespaar 50% tijd

  • Ingewikkelde en herhaalde bewerkingen kunnen een eenmalige verwerking in seconden worden uitgevoerd.
  • Voeg meerdere afbeeldingen in verschillende mappen tegelijk in een Word-document in.
  • Voeg meerdere Word-bestanden in mappen samen en combineer ze tot één met de door u gewenste volgorde.
  • Splits het huidige document in afzonderlijke documenten op basis van koptekst, sectie-einde of andere criteria.
  • Converteer bestanden tussen Doc en Docx, Docx en PDF, verzameling tools voor algemene conversies en selectie, enzovoort ...
Heb je vragen? Stel ze hier. (3)
Nog geen beoordelingen. Beoordeel als eerste!
Deze opmerking is gemaakt door de moderator op de site
Bedankt, dit is erg handig. Ik wilde alle instanties van Heading1 en Heading2 tegelijk selecteren, dus ik veranderde regel 7 in dit: If (tempTable.Style = ActiveDocument.Styles(wdStyleHeading1)) Or (tempTable.Style = ActiveDocument.Styles(wdStyleHeading2)) Dan
Deze opmerking is gemaakt door de moderator op de site
Bedankt, dit is erg handig. Ik wilde alle instanties van alle koppen tegelijk selecteren, dus ik veranderde regel 7 in dit:
Als tempTable.OutlineLevel <> wdOutlineLevelBodyText Dan
Deze opmerking is gemaakt door de moderator op de site
Dit is zeker erg handig, heel erg bedankt. Is er een manier om vetgedrukte tekst toe te voegen aan de selectie? wat zou de beste manier zijn om lijn 7 te veranderen? Ik wil alle koppen en ook alle trefwoorden in normale tekst die vet gemarkeerd zijn in de tekst.
Er zijn nog geen reacties geplaatst

Volg ons

Copyright © 2009 - www.extendoffice.com. | Alle rechten voorbehouden. Aangedreven door ExtendOffice. | Sitemap
Microsoft en het Office-logo zijn handelsmerken of gedeponeerde handelsmerken van Microsoft Corporation in de Verenigde Staten en / of andere landen.
Beschermd door Sectigo SSL