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

Hur markerar jag alla rubrikavsnitt i Word?

Ibland måste vi ta bort eller redigera alla rubriker. Det första steget är att välja alla rubriker. Denna handledning lär dig följande metoder för att välja alla rubrikavsnitt.

Välj alla rubrikavsnitt med Sök och ersätt

Välj alla rubrikavsnitt med VBA

Välj alla rubrikavsnitt med Kutool for Word


pil blå höger bubblaVälj alla rubrikavsnitt med Sök och ersätt

Fantastisk! Använd effektiva flikar i Word (Office) som Chrome, Firefox och New Internet Explorer!

Läs mer Gratis nedladdning

Funktionen Sök och ersätt i ord är det vanligaste sättet att välja alla rubrikavsnitt.

Steg 1: Klicka Start >hitta och välj Sök i förväg markera

Steg 2: Klicka Snarare knapp för att visa fler sökalternativ;

doc-välj-rubrik-stycken-1

Steg 3: Klicka bildad markera popup-alternativ nedan.

doc-välj-rubrik-stycken-2

Steg 4: Klicka på Stil för att välja rubrikstil du har använt i dialogrutan Hitta vilken stil.

doc-välj-rubrik-stycken-3

Notera: den här metoden kan bara välja ett rubrikavsnitt varje gång. Det är tidskrävande att redigera alla rubriker.


pil blå höger bubblaVälj alla rubrikavsnitt med VBA

Alternativt kan vi använda VBA för att välja alla rubriker.

Steg 1: Tryck "Alt-F11" för att öppna Microsoft Visual Basic for Application-fönstret;

Steg 2: Klicka ModulernaInsert flik, kopiera och klistra in följande VBA-kod i modulfönstret;

Steg 3: Klicka sedan på rundoc-omvänd-tecken-6 knappen för att tillämpa VBA.

VBA-koden för att välja alla rubriker:

Sub SelectHeadingParagraphs ()
Dim tempTable Som stycke
Application.ScreenUpdating = False
ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
För varje tempTable i ActiveDocument.Paragraphs
'Debug.Print tempTable.Range.Style & "" & wdStyleHeading2
If tempTable.Style = ActiveDocument.Styles (wdStyleHeading2) Then
'Felsök. Skriv ut "aaa"
tempTable.Range.Editors.Add wdEditorEveryone
End If
Nästa
ActiveDocument.SelectAllEditableRanges wdEditorEveryone
ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
Application.ScreenUpdating = True
End Sub

Notera: den här metoden tar rubrik2 som ett exempel. Rubrik2 kan ändras till en annan rubrikformat.


pil blå höger bubblaVälj alla rubrikavsnitt med Kutool for Word

Finns det ett enklare sätt att välja alla rubriker? Kutool för Word är ditt bästa val. När du har installerat Kutool för Word kan du välja alla rubriker (rubriker) med ett klick.

Kutools for Word, ett praktiskt tillägg, innehåller grupper av verktyg för att underlätta ditt arbete och förbättra din förmåga att bearbeta orddokument. Gratis provperiod i 45 dagar! Hämta den nu!

Klicka Kutools >Stycke Välj i avsnittet Välj avsnitt. Se skärmdump

doc-välj-rubrik-stycken-4

För mer detaljerad information om Välj rubrikavsnitt of Kutools for Word, besök: Stycke Välj funktionsbeskrivning



Rekommenderade Word-produktivitetsverktyg

 

Kutools For Word - Mer än 100 avancerade funktioner för Word, spara 50 % tid

  • Komplicerade och upprepade operationer kan göras engångsbehandling på några sekunder.
  • Infoga flera bilder över mappar i Word-dokumentet samtidigt.
  • Slå ihop och kombinera flera Word-filer över mappar till en med önskad ordning.
  • Dela upp det aktuella dokumentet i separata dokument enligt rubrik, avsnittbrytning eller andra kriterier.
  • Konvertera filer mellan Doc och Docx, Docx och PDF, samling verktyg för vanliga konverteringar och val, och så vidare ...
Sortera kommentarer efter
Kommentarer (3)
Inga betyg än. Bli först med att betygsätta!
Denna kommentar minimerades av moderatoren på webbplatsen
Tack, det här är väldigt användbart. Jag ville välja alla instanser av Rubrik1 och Rubrik2 på en gång, så jag ändrade rad 7 till detta: If (tempTable.Style = ActiveDocument.Styles(wdStyleHeading1)) Eller (tempTable.Style = ActiveDocument.Styles(wdStyleHeading2)) Då
Denna kommentar minimerades av moderatoren på webbplatsen
Tack, det här är väldigt användbart. Jag ville välja alla instanser av alla rubriker på en gång, så jag ändrade rad 7 till detta:
If tempTable.OutlineLevel <> wdOutlineLevelBodyText Then
Denna kommentar minimerades av moderatoren på webbplatsen
Detta är verkligen användbart, tack så mycket. Finns det något sätt att lägga till fet text i markeringen? vad skulle vara det bästa sättet att ändra linje 7? Jag vill få alla rubriker och även alla nyckelord i normal text som är markerade med fet stil i texten.
Det finns inga kommentarer här ännu

Följ oss

Copyright © 2009 - www.extendoffice.com. | Alla rättigheter förbehållna. Drivs av ExtendOffice. | | Sitemap
Microsoft och Office-logotypen är varumärken eller registrerade varumärken som tillhör Microsoft Corporation i USA och / eller andra länder.
Skyddad av Sectigo SSL