Un lector de WordTips escribió preguntando cómo usar Word para ordenar algunos datos que se habían recopilado a lo largo de los años. Los datos son para una firma legal, por lo que los nombres pueden tener sufijos, como los siguientes:

John Davis, Esq.

La pregunta era cómo ordenar esto correctamente, como pudo hacer el lector con WordPerfect. La mejor solución a largo plazo, por supuesto, es convertir los datos a un formato de base de datos, como Access o incluso a una hoja de cálculo, como Excel. Sin embargo, a falta de eso, la siguiente macro permitirá que la lista se ordene correctamente:

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

Para usar esta macro, simplemente seleccione los párrafos que desea ordenar y luego ejecute la macro. Busca una coma en cada párrafo y luego busca la palabra justo antes de la coma. Reemplaza el espacio (o pestaña)

justo antes de esa palabra con una pestaña. Por lo tanto, cada párrafo se divide en dos campos: el primer y posiblemente el segundo nombre es el primer campo, mientras que el apellido y el posible sufijo es el segundo campo. A continuación, la selección se ordena según el segundo campo.

_Nota: _

Si desea saber cómo usar las macros descritas en esta página (o en cualquier otra página de los sitios WordTips), he preparado una página especial que incluye información útil.

link: / wordribbon-WordTipsMacros [Haga clic aquí para abrir esa página especial en una nueva pestaña del navegador].

WordTips es su fuente de formación rentable en Microsoft Word.

(Microsoft Word es el software de procesamiento de textos más popular del mundo). Esta sugerencia (10077) se aplica a Microsoft Word 2007, 2010, 2013, 2016, 2019 y Word en Office 365. Puede encontrar una versión de esta sugerencia para interfaz de menú anterior de Word aquí:

link: / word-Odd_Sorting [Ordenación impar].