Método OfficeDataSourceObject.SetSortOrder (Office)
Define a ordem de classificação dos dados de mala direta.
Sintaxe
expressão. SetSortOrder (SortField1, SortAscending1, SortField2, SortAscending2, SortField3, SortAscending3)
Expressão Uma variável que representa um objeto OfficeDataSourceObject .
Parâmetros
Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
---|---|---|---|
SortField1 | Obrigatório | String | O primeiro campo no qual os dados de mala direta devem ser classificados. |
SortAscending1 | Opcional | Boolean | True (padrão) para efetuar uma classificação crescente em SortField1; Classificar false para efetuar uma decrescente. |
SortField2 | Opcional | String | O segundo campo no qual os dados de mala direta devem ser classificados. O padrão é uma cadeia de caracteres vazia. |
SortAscending2 | Opcional | Boolean | True (padrão) para efetuar uma classificação crescente em SortField2; Classificar false para efetuar uma decrescente. |
SortField3 | Opcional | String | O terceiro campo no qual os dados de mala direta devem ser classificados. O padrão é uma cadeia de caracteres vazia. |
SortAscending3 | Opcional | Boolean | True (padrão) para efetuar uma classificação crescente em SortField3; Classificar false para efetuar uma decrescente. |
Exemplo
O exemplo a seguir classifica a fonte de dados primeiro de acordo com o Código Postal em ordem decrescente e, em seguida, em sobrenome e primeiro nome em ordem crescente.
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
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.