Gå til hovedindhold

Hvordan vælges alle overskriftsafsnit i Word?

Nogle gange er vi nødt til at slette eller redigere alle overskriftsafsnit. Det første trin er at vælge alle overskriftsafsnit. Denne vejledning lærer dig følgende metoder til, hvordan du vælger alle afsnit til overskrifter.

Vælg alle overskriftsafsnit med Find og erstat

Vælg alle overskriftsafsnit med VBA

Vælg alle overskriftsafsnit med Kutool for Word


pil blå højre bobleVælg alle overskriftsafsnit med Find og erstat

Office-fanen: Bringer fanebladsgrænseflader til Word, Excel, PowerPoint...
ot ord mellem annonce 100
Forbedre din arbejdsgang nu.      Læs mere       Gratis download

Funktionen Find og erstat i ord er den mest almindelige måde at vælge alle overskriftsafsnit på.

Trin 1: Klik Home >Finde og vælg Find på forhånd markere

Trin 2: Klik Mere knap for at få flere søgemuligheder op;

doc-vælg-overskrift-afsnit-1

Trin 3: Klik dannet markere pop op-muligheder nedenfor.

doc-vælg-overskrift-afsnit-2

Trin 4: Klik på stil for at vælge overskrift stil du har brugt i Find hvilken stil-dialogboks.

doc-vælg-overskrift-afsnit-3

Bemærk: denne metode kan kun vælge et afsnit overskrift hver gang. Det er tidskrævende at redigere alle overskriftsafsnit.


pil blå højre bobleVælg alle overskriftsafsnit med VBA

Alternativt kan vi bruge VBA til at vælge alle afsnit overskrifter.

Trin 1: Tryk på "Alt-F11" at åbne Microsoft Visual Basic for Application-vinduet;

Trin 2: Klik Moduler på den indsatte fane, kopier og indsæt følgende VBA-kode i modulvinduet;

Trin 3: Klik derefter på Kørdoc-omvendt-tegn-6 knappen for at anvende VBA.

VBA-koden for at vælge alle overskriftsafsnit:

Sub SelectHeadingParagraphs ()
Dim tempTable Som afsnit
Application.ScreenUpdating = False
ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
For hver tempTable i ActiveDocument.Paragraphs
'Debug.Print tempTable.Range.Style & "" & wdStyleHeading2
Hvis tempTable.Style = ActiveDocument.Styles (wdStyleHeading2) Derefter
'Fejlfinding. Udskriv "aaa"
tempTable.Range.Editors.Tilføj wdEditorEveryone
End If
Næste
ActiveDocument.SelectAllEditableRanges wdEditorEveryone
ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
Application.ScreenUpdating = True
End Sub

Note: denne metode tager overskrift2 som et eksempel. Overskrift2 kan skifte til en anden overskriftstype.


pil blå højre bobleVælg alle overskriftsafsnit med Kutool for Word

Er der en nemmere måde at vælge alle overskriftsafsnit på? Kutool for Word er dit bedste valg. Når du har installeret Kutool til Word, kan du vælge alle overskrifter (overskrift afsnit) med et enkelt klik.

Kutools for Word, en praktisk tilføjelse, indeholder grupper af værktøjer, der letter dit arbejde og forbedrer din evne til at behandle orddokument. Gratis prøveperiode i 45 dage! Hent den nu!

Klik Kutools >Afsnit Vælg i afsnittet Vælg afsnit. Se skærmbillede

doc-vælg-overskrift-afsnit-4

For mere detaljeret information om Vælg Overskrift afsnit af Kutools for Word, besøg venligst: Afsnit Vælg funktionsbeskrivelse


Bedste kontorproduktivitetsværktøjer

Kutools for Word - Forøg din Word-oplevelse med Over 100 Bemærkelsesværdige funktioner!

Dyk ned i de fremhævede funktioner nedenfor eller klik her for at udforske den fulde kraft af Kutools for Word.

📘 Dokumentbeherskelse: Opdelt sider  /  Flet dokumenter  /  Eksporter udvalg i forskellige formater (PDF/TXT/DOC/XLSX)  /  Batch Konverter til PDF  /  Eksporter sider som billeder  /  Udskriv flere filer på én gang ...

Indholdsredigering: Batch Find og erstat på tværs af flere filer   /  Ændr størrelse på alle billeder   /  Transponer tabelrækker og kolonner  /  Konverter tabel til tekst ...

🧹 Ubesværet rengøringFej væk Ekstra pladser  /  Afsnit bryder  /   Alle overskrifter  /  Tekstbokse  /  Hyperlinks  /  For flere fjernelsesværktøjer, gå til vores Fjerngruppe

Kreative indlæg: indsatte Tusind adskillere  /  Afkrydsningsfelter  /  Radio knapper  /  QR kode  /  Stregkode  /  Diagonal linjebord  /  Ligningstekst  /  Billede Caption  /  Tabeltekst  /  Flere billeder  /  Opdag mere i vores Indsæt-gruppe

???? Præcisionsvalg: Find bestemte sider  /  tabeller  /  former  /  overskrifter  /  Naviger nemt ved hjælp af vores udvalgte gruppe

Stjerneforbedringer: Naviger hurtigt til ethvert sted  /  automatisk indsæt gentagende tekst  /  skifte problemfrit mellem dokumentvinduer  /  11 Konverteringsværktøjer ...

Transformer dine Word-opgaver med Kutools. 👉 Download med 30-dages prøveversion nu 🚀.

Læs mere       Gratis download      Køb
 
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