Compartilhar via

Propriedade Search.Filter (Outlook)

  • Artigo

Retorna um valor String que representa a instrução DASL usada para restringir a pesquisa a um subconjunto especificado de dados. Somente leitura

Sintaxe

expression. Filter

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

Comentários

Essa propriedade é definida como o argumento Filtrar no método AdvancedSearch do objeto Application.

Ao pesquisar campos de texto, você pode usar um apóstrofo (') ou aspas duplas ("") para delimitar os valores que fazem parte do filtro. Por exemplo, todas as linhas a seguir funcionam corretamente quando o campo é do tipo Cadeia de caracteres :

sFilter = "[CompanyName] = 'Microsoft'"

sFilter = "[CompanyName] = ""Microsoft"""

sFilter = "[CompanyName] = " & Chr(34) & "Microsoft" & Chr(34)

Exemplo

Os seguintes Microsoft exemplo Visual Basic for Applications (VBA) cria um novo objeto de pesquisa. A sub-rotina do evento é acionado depois que a pesquisa foi concluída e exibe as propriedades de marca e filtro do objeto de pesquisa, bem como os resultados da pesquisa.

Sub SearchInboxFolder() 
 
 'Searches the Inbox folder 
 
 Dim objSch As Outlook.Search 
 
 Const strF As String = _ 
 
 "urn:schemas:mailheader:subject = 'Office Holiday Party'" 
 
 Const strS As String = "Inbox" 
 
 Const strTag As String = "SubjectSearch" 
 
 Set objSch = _ 
 
 Application.AdvancedSearch(Scope:=strS, Filter:=strF, Tag:=strTag) 
 
End Sub

Use uma sub-rotina do evento AdvancedSearchComplete para garantir a integridade dos dados armazenados no objeto Search.

Private Sub Application_AdvancedSearchComplete(ByVal SearchObject As Search) 
 
 Dim objRsts As Outlook.Results 
 
 Dim Item as Outlook.MailItem 
 
 MsgBox "The search " & SearchObject.Tag & "has finished. The filter used was " & _ 
 
 SearchObject.Filter & "." 
 
 Set objRsts = SearchObject.Results 
 
 'Print out number in results collection 
 
 MsgBox objRsts.Count 
 
 'Print out each member of results collection 
 
 For Each Item In objRsts 
 
 MsgBox Item 
 
 Next 
 
 
 
End Sub

Confira também

Objeto Search

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.