Método SetSortOrder

Microsoft Office Objects

Método SetSortOrder

       

Establece el orden de clasificación de los datos de combinación de correspondencia.

expresión.SetSortOrder(SortField1, SortAscending1, SortField2, SortAscending2, SortField3, SortAscending3)

expresión   Requerida. Expresión que devuelve uno de los objetos de la lista Aplicar a.

SortField1  String requerida. El primer campo en el que se clasifican los datos de combinación de correspondencia.

SortAscending1  Boolean opcional. True (predeterminado) para realizar una clasificación ascendente en SortField1; False para realizar una clasificación descendente.

SortField1  String requerida. El segundo campo en el que se clasifican los datos de combinación de correspondencia. El valor predeterminado es una cadena vacía.

SortAscending2  Boolean opcional. True (predeterminado) para realizar una clasificación ascendente en SortField2; False para realizar una clasificación descendente.

SortField3  String requerida. El tercer campo en el que se clasifican los datos de combinación de correspondencia. El valor predeterminado es una cadena vacía.

SortAscending3  Boolean opcional. True (predeterminado) para realizar una clasificación ascendente en SortField3; False para realizar una clasificación descendente.

Ejemplo

El ejemplo siguiente clasifica primero el origen de datos según el código postal en orden descendente, a continuación según el apellido y el nombre de pila en orden ascendente.

Sub SetDataSortOrder()
    Dim appOffice As OfficeDataSourceObject

    Set appOffice = Application.OfficeDataSourceObject

    appOffice.Open bstrConnect:="DRIVER=SQL Server;SERVER=ServerName;" & _
        "UID=user;PWD=;DATABASE=Northwind", bstrTable:="Employees"

    appOffice.SetSortOrder SortField1:="ZipCode", _
        SortAscending1:=False, SortField2:="LastName", _
        SortField3:="FirstName"
End Sub