Propriedade Search.Results (Outlook)
Retorna uma coleção de resultados que especifica os resultados da pesquisa. Somente leitura.
Sintaxe
expression. Results
Expressão Uma variável que representa um objeto Search .
Exemplo
O exemplo de VBA (Visual Basic for Applications) a seguir pesquisa na caixa de entrada itens com um assunto igual a "Teste" e exibe os nomes dos remetentes dos itens de email retornados pela pesquisa. O procedimento de evento AdvanceSearchComplete
define o boolean blnSearchComp
como True quando a pesquisa é concluída. Essa variável boolean é usada pelo procedimento TestAdvancedSearchComplete()
para determinar quando a pesquisa é concluída. O código de exemplo deve ser colocado em um módulo de classe, como ThisOutlookSession, e o TestAdvancedSearchComplete()
procedimento deve ser chamado antes que o procedimento de evento possa ser chamado pelo Outlook.
Public blnSearchComp As Boolean
Private Sub Application_AdvancedSearchComplete(ByVal SearchObject As Search)
MsgBox "The AdvancedSearchComplete Event fired"
blnSearchComp = True
End Sub
Sub TestAdvancedSearchComplete()
Dim sch As Outlook.Search
Dim rsts As Outlook.Results
Dim i As Integer
blnSearchComp = False
Const strF As String = "urn:schemas:mailheader:subject = 'Test'"
Const strS As String = "Inbox"
Set sch = Application.AdvancedSearch(strS, strF)
While blnSearchComp = False
DoEvents
Wend
Set rsts = sch.Results
For i = 1 To rsts.Count
MsgBox rsts.Item(i).SenderName
Next
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.