Sortering etter Opplyser

November 29  by Eliza

Tim har en liste over elementer i et Word-dokument. Hvert element er i sin egen paragraf (Enter på slutten), og ikke i en tabell. Noen av elementene (nr) har utheving brukes på dem. Tim lurer på om det er en måte å sortere avsnitt slik at de markerte avsnittene er sammen. Med andre ord, han trenger å sortere etter høydepunkt som den primære sorteringsnøkkel.

Ord kan sortere etter mange ting, men sortering av utheving er ikke en av de tingene. Men Finn og erstatt kan søke for å fremheve. En metode er å bruke Finn og erstatt som prefiks for hver uthevet avsnitt med en unik søkeord, kjøre Finn og erstatt igjen som prefiks som ikke er uthevet avsnitt med et annet søkeord, og deretter sortere ut dokumentet med det første ordet som den første nøkkelen slik at den uthevede avsnitt er sammen. Etterpå kjører Søk og erstatt for å fjerne de to spesielle nøkkelord. Selvsagt er denne fremgangsmåte vanskelig å installere og krever flere trinn.

En annen tilnærming er å bare sortere alle ledd, uten hensyn til merkingen. Når det er gjort, kan du bruke en makro til å flytte markerte avsnittene til starten av dokumentet. De markerte avsnittene vil vises i sortert rekkefølge de var i dokumentet.

Sub MoveHighlightedParas ()
Dim paraMax Som Long
Dim paraStart Som Long
Dim j Som Long
Dim r Som Range

Med ActiveDocument
paraMax = .Paragraphs.Count
paraStart = 0
j = paraMax
Gjør Mens j> paraStart
Hvis .Paragraphs (j) .Range.HighlightColorIndex <> wdNoHighlight Deretter
.Paragraphs (J) .Range.Cut
Sette r = .Content
r.Collapse
r.Paste
paraStart = paraStart + 1
Else
j = j - 1
End If
Loop
Avslutt med
End Sub

WordTips er din kilde for kostnadseffektiv Microsoft Word trening. (Microsoft Word er den mest populære tekstbehandlingsprogrammet i verden.) Dette tipset (13272) gjelder for Microsoft Word 2007, 2010, og 2013.