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