Método SortFields.Add (Excel)

Crea un nuevo campo de ordenación y devuelve un objeto SortFields.

Sintaxis

expresión.Add (Key, SortOn, Order, CustomOrder, DataOption)

expresión Variable que representa un objeto SortFields.

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Description
Clave	Obligatorio	Rango	Especifica un valor clave para la ordenación.
SortOn	Opcional	Variant	Valor XlSortOn que especifica la propiedad de una celda que se va a usar para la ordenación.
Order	Opcional	Variant	Valor XlSortOrder que especifica el criterio de ordenación.
CustomOrder	Opcional	Variant	Especifica si se debe utilizar un criterio de ordenación personalizado.
DataOption	Opcional	Variant	Valor XlSortDataOption que especifica cómo ordenar el texto.

Valor devuelto

SortField

Observaciones

Esta API no incluye compatibilidad con tipos de datos, como Información geográfica o Cotizaciones. Para definir un criterio de ordenación basado en un SubField de uno de estos tipos, consulte el método Add2.

Ejemplo

En este ejemplo se ordena una tabla, Table1 en Sheet1, por Column1 de la A a la Z.

Se llama al método Clear antes para asegurarse de que se borra la ordenación anterior y se pueda aplicar una nueva.

Se llama al objeto Sort para aplicar la ordenación añadida a Table1.

ActiveWorkbook.Worksheets("Sheet1").ListObjects("Table1").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Sheet1").ListObjects("Table1").Sort.SortFields.Add _
 Key:=Range("Table1[[#All],[Column1]]"), _
 SortOn:=xlSortOnValues, _
 Order:=xlAscending, _
 DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("Sheet1").ListObjects("Table1").Sort
 .Header = xlYes
 .MatchCase = False
 .Orientation = xlTopToBottom
 .SortMethod = xlPinYin
 .Apply
End With

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.