Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
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 de Pesquisa .
Comentários
Esta propriedade é definida como o argumento Filtro no método AdvancedSearch do objeto da Aplicação.
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 seguintes funcionam corretamente quando o campo é do tipo Cadeia :
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
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.