Compartilhar via


Método Items.Sort (Outlook)

Classifica o conjunto de itens pela propriedade especificada. O índice do conjunto será redefinido como 1 após a conclusão desse método.

Sintaxe

expressão. Classificar (propriedade, decrescente)

Expressão Uma variável que representa um objeto Items .

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Propriedade Obrigatório String O nome da propriedade pela qual classificar, que pode ser colocado entre colchetes, por exemplo, "[CompanyName]". As propriedades definidas pelo usuário que contêm espaços devem ser colocadas entre colchetes. Talvez não seja uma propriedade definida pelo usuário do tipo palavras-chave e talvez não seja uma propriedade de valores múltiplos, como uma categoria. Para propriedades definidas pelo usuário, a propriedade deverá existir na coleção UserDefinedProperties para Items.Parent, que representa o objeto de pasta que contém os itens.
Descending Opcional Variant True para classificar em ordem decrescente. O valor padrão é False (crescente).

Comentários

Classificar afeta somente a ordem dos itens em uma coleção. Ela não afeta a ordem dos itens em um modo de exibição do explorer.

A classificação não pode ser usada e causará um erro se o paramater De propriedade for uma das seguintes propriedades:

Categories LastFirstSpaceOnly
Classe MemberCount
CompanyLastFirstNoSpace NetMeetingAlias
CompanyLastFirstSpaceOnly RecurrenceState
DLName ResponseState
LastFirstAndSuffix Salvo
LastFirstNoSpace Sent
LastFirstNoSpaceCompany

Exemplo

O seguinte exemplo Visual Basic for Applications (VBA) usa o método Sort para classificar a coleção de itens para a pasta padrão tarefas pela propriedade "DueDate" e exibe as datas de vencimento cada por sua vez.

Sub SortByDueDate() 
 Dim myNameSpace As Outlook.NameSpace 
 Dim myFolder As Outlook.Folder 
 Dim myItem As Outlook.TaskItem 
 Dim myItems As Outlook.Items 
 
 Set myNameSpace = Application.GetNamespace("MAPI") 
 Set myFolder = myNameSpace.GetDefaultFolder(olFolderTasks) 
 Set myItems = myFolder.Items 
 myItems.Sort "[DueDate]", False 
 For Each myItem In myItems 
 MsgBox myItem.Subject & "-- " & myItem.DueDate 
 Next myItem 
End Sub

Confira também

Objeto Items

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.