Un lettore di WordTips ha scritto chiedendo come usare Word per ordinare alcuni dati che erano stati raccolti nel corso degli anni. I dati sono per uno studio legale, quindi i nomi potrebbero avere suffissi, come i seguenti:

John Davis, Esq.

La domanda era come ordinarlo correttamente, come il lettore poteva fare con WordPerfect. La migliore soluzione a lungo termine, ovviamente, è convertire i dati in un formato di database, come Access o anche in un foglio di calcolo, come Excel. A parte questo, tuttavia, la seguente macro consentirà di ordinare correttamente l’elenco:

Sub CustomSort()

Set myrange = Selection.Range     For Each p In myrange.Paragraphs         p.Range.Select         If InStr(1, p, ",") > 0 Then             CharCount = InStr(1, p, ",") - 1             Selection.StartOf             Selection.MoveRight Unit:=wdCharacter, _               Count:=CharCount         Else             Selection.EndOf             Selection.MoveLeft Unit:=wdCharacter, _               Count:=1         End If         Selection.MoveLeft Unit:=wdWord, Count:=1         Selection.MoveLeft Unit:=wdCharacter, _           Count:=1, Extend:=wdExtend         Selection.TypeText Text:=vbTab     Next p     myrange.Select     Selection.Sort ExcludeHeader:=False, _       FieldNumber:="Field 2", _       SortFieldType:=wdSortFieldAlphanumeric, _       SortOrder:=wdSortOrderAscending, _       FieldNumber2:="Field 1", _       SortFieldType2:=wdSortFieldAlphanumeric, _       SortOrder2:=wdSortOrderAscending, _       FieldNumber3:="", _       SortFieldType3:=wdSortFieldAlphanumeric, _       SortOrder3:=wdSortOrderAscending, _       Separator:=wdSortSeparateByTabs, _       SortColumn:=False, _       CaseSensitive:=False, _       LanguageID:=wdLanguageNone End Sub

Per utilizzare questa macro, seleziona semplicemente i paragrafi che desideri ordinare, quindi esegui la macro. Cerca una virgola in ogni paragrafo, quindi trova la parola appena prima della virgola. Sostituisce lo spazio (o la tabulazione)

appena prima di quella parola con una tabulazione. Pertanto, ogni paragrafo è separato in due campi: il primo e possibilmente il secondo nome è il primo campo, mentre il cognome e l’eventuale suffisso è il secondo campo. La selezione viene quindi ordinata in base al secondo campo.

_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 (10077) si applica a Microsoft Word 2007, 2010, 2013, 2016, 2019 e Word in Office 365. Puoi trovare una versione di questo suggerimento per vecchia interfaccia del menu di Word qui:

Ordinamento dispari.