Tim ha un elenco di elementi in un documento di Word. Ogni elemento è nel proprio paragrafo (Invio alla fine) e non in una tabella. Ad alcuni degli elementi (paragrafi) è applicata l’evidenziazione. Tim si chiede se esiste un modo per ordinare i paragrafi in modo che i paragrafi evidenziati siano insieme. In altre parole, deve ordinare per evidenziazione come chiave di ordinamento primaria.

Le parole possono ordinare in base a molte cose, ma l’ordinamento per evidenziazione non è una di quelle cose. Tuttavia, Trova e sostituisci può cercare l’evidenziazione. Un metodo potrebbe essere quello di utilizzare Trova e sostituisci per aggiungere un prefisso a ogni paragrafo evidenziato con una parola chiave univoca, eseguire di nuovo Trova e sostituisci per aggiungere un prefisso ai paragrafi non evidenziati con un’altra parola chiave, quindi ordinare il documento utilizzando la prima parola come prima chiave in modo che l’elemento evidenziato i paragrafi sono insieme. Successivamente eseguire Trova e sostituisci per rimuovere le due parole chiave speciali. Ovviamente, questo metodo è complicato da configurare e richiede diversi passaggi.

Un altro approccio consiste nell’ordinare semplicemente tutti i paragrafi, indipendentemente dall’evidenziazione. Una volta fatto, puoi usare una macro per spostare i paragrafi evidenziati all’inizio del documento. I paragrafi evidenziati appariranno nell’ordine in cui erano nel documento.

Sub MoveHighlightedParas()

Dim paraMax As Long     Dim paraStart As Long     Dim j As Long     Dim r As Range

With ActiveDocument         paraMax = .Paragraphs.Count         paraStart = 0         j = paraMax         Do While j > paraStart             If .Paragraphs(j).Range.HighlightColorIndex <> wdNoHighlight Then                 .Paragraphs(j).Range.Cut                 Set r = .Content                 r.Collapse                 r.Paste                 paraStart = paraStart + 1             Else                 j = j - 1             End If         Loop     End With End Sub

_Nota: _

Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti WordTips), ho preparato una pagina speciale che include informazioni utili.

Fare clic qui per aprire quella pagina speciale in una nuova scheda del browser.

WordTips è la tua fonte di formazione economica su Microsoft Word.

(Microsoft Word è il software di elaborazione testi più popolare al mondo.) Questo suggerimento (13272) si applica a Microsoft Word 2007, 2010, 2013, 2016, 2019 e Word in Office 365.