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

Kako izbrati vse odstavke naslovov v Wordu?

Včasih moramo izbrisati ali urediti vse odstavke naslovov. Prvi korak je izbrati vse odstavke naslovov. Ta vadnica vas bo naučila naslednjih metod, kako izbrati vse odstavke naslovov.

Izberite vse odstavke naslovov z možnostjo Najdi in zamenjaj

Z VBA izberite vse odstavke naslovov

Izberite vse odstavke naslovov s programom Kutool for Word


puščica modri desni mehurčekIzberite vse odstavke naslovov z možnostjo Najdi in zamenjaj

Neverjetno! Uporabite učinkovite zavihke v programu Word (Office), kot so Chrome, Firefox in New Internet Explorer!

Preberi več Brezplačen prenos

Funkcija Najdi in zamenjaj v besedi je najpogostejši način za izbiro vseh odstavkov naslovov.

Korak 1: kliknite Home >Najdi In izberite Predhodno iskanje znamka

2. korak: kliknite Več gumb za prikaz več možnosti iskanja;

doc-select-heading-odstavki-1

Korak 3: kliknite oblikovana spodaj označite pojavne možnosti.

doc-select-heading-odstavki-2

Korak 4: Kliknite na Style da izberete slog naslova ste uporabili v pogovornem oknu Poišči kakšen slog.

doc-select-heading-odstavki-3

Opomba: ta metoda lahko vsakič izbere samo en odstavek naslova. Urejanje vseh odstavkov naslovov je zamudno.


puščica modri desni mehurčekZ VBA izberite vse odstavke naslovov

Lahko pa uporabimo VBA za izbiro vseh odstavkov naslovov.

Korak 1: Pritisnite "Alt-F11" odpreti okno Microsoft Visual Basic for Application;

Korak 2: kliknite Moduli o Vstavi zavihek, kopirajte in prilepite naslednjo kodo VBA v okno modula;

3. korak: Nato kliknite Rundoc-revers-sign-6 gumb za uporabo VBA.

Koda VBA za izbiro vseh odstavkov naslovov:

Sub SelectHeadingParagraphs ()
Dim tempTable kot odstavek
Application.ScreenUpdating = Napačno
ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
Za vsako zapeljivo tabelo v ActiveDocument.Paragraphs
'Debug.Print tempTable.Range.Style & "" & wdStyleHeading2
Če je tempTable.Style = ActiveDocument.Styles (wdStyleHeading2), potem
'Debug.Tiskaj "aaa"
tempTable.Range.Editors.Add wdEditorEveryone
Konec Če
Naslednji
ActiveDocument.SelectAllEditableRanges wdEditorEveryone
ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
Application.ScreenUpdating = Res
End Sub

Opomba: ta metoda za primer vzame naslov 2. Naslov 2 se lahko spremeni v drug slog naslova.


puščica modri desni mehurčekIzberite vse odstavke naslovov s programom Kutool for Word

Ali obstaja lažji način za izbiro vseh odstavkov naslovov? Kutool za Word je vaša najboljša izbira. Ko ste namestili Kutool za Word, lahko z enim klikom izberete vse naslove (odstavke naslovov).

Kutools za Word, priročen dodatek, vključuje skupine orodij, ki vam olajšajo delo in izboljšajo sposobnost obdelave besedilnega dokumenta. Brezplačna preizkusna različica 45 dni! Get It Now!

klik Kutools >Izberite odstavek v skupini za izbiro odstavka. Oglejte si posnetek zaslona

doc-select-heading-odstavki-4

Za podrobnejše informacije o Izberite odstavke naslova Kutools za Word, obiščite: Izberite odstavek opis lastnosti



Priporočena orodja za produktivnost besed

 

Kutools za Word - Več kot 100 naprednih funkcij za Word, prihranite 50% časa

  • Zapletene in ponavljajoče se operacije je mogoče enkrat obdelati v nekaj sekundah.
  • V Wordov dokument hkrati vstavite več slik v mape.
  • Združite in združite več datotek Word v mapah v eno z želenim vrstnim redom.
  • Trenutni dokument razdelite na ločene dokumente glede na naslov, prelom odseka ali druga merila.
  • Pretvarjanje datotek med dokumenti Doc in Docx, Docx in PDF, zbirka orodij za pogoste pretvorbe in izbiro itd. ...
Komentarji (3)
Ocene še ni. Bodite prvi in ​​ocenite!
Ta komentar je moderator na spletnem mestu minimiziral
Hvala, to je zelo koristno. Želel sem izbrati vse primerke Heading1 in Heading2 naenkrat, zato sem spremenil vrstico 7 v to: If (tempTable.Style = ActiveDocument.Styles(wdStyleHeading1)) ali (tempTable.Style = ActiveDocument.Styles(wdStyleHeading2)) Potem
Ta komentar je moderator na spletnem mestu minimiziral
Hvala, to je zelo koristno. Hotel sem izbrati vse primerke vseh naslovov hkrati, zato sem 7. vrstico spremenil v to:
Če je tempTable.OutlineLevel <> wdOutlineLevelBodyText Potem
Ta komentar je moderator na spletnem mestu minimiziral
To je vsekakor zelo uporabno, najlepša hvala. Ali obstaja način, da dodate krepko besedilo v izbor? kakšen bi bil najboljši način za spremembo vrstice 7? Želim dobiti vse naslove in tudi vse ključne besede v običajnem besedilu, ki so v besedilu označene s krepko pisavo.
Tu še ni objavljenih komentarjev
Pustite vaše komentarje
Objava kot gost
×
Ocenite to objavo:
0   Znaki
Predlagane lokacije

Sledi nam

Copyright © 2009 - www.extendoffice.com. | Vse pravice pridržane. Poganja ga ExtendOffice. | Kazalo
Microsoft in logotip Office sta blagovni znamki ali registrirani blagovni znamki družbe Microsoft Corporation v ZDA in / ali drugih državah.
Zaščiteno s Sectigo SSL