Compartir a través de


Método SortFields.Add (Excel)

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

Sintaxis

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

expresión Variable que representa un objeto SortFields .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
Clave Obligatorio Rango Especifica un valor clave para la ordenación.
SortOn Opcional Variant Valor XlSortOn que especifica qué propiedad de una celda 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 texto.

Valor devuelto

SortField

Observaciones

Esta API no incluye compatibilidad con tipos de datos, como Geography o Stocks. Para definir un criterio de ordenación basado en un SubField de uno de estos tipos, vea el método Add2 .

Ejemplo

En este ejemplo se ordena una tabla, Table1 en Sheet1, por Column1 en orden ascendente.

Antes se llama al método Clear para asegurarse de que se borra la ordenación anterior para que se pueda aplicar uno nuevo.

Se llama al objeto Sort para aplicar la ordenación agregada 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.