Propriedade Search.Scope (Outlook)
Retorna uma cadeia de caracteres que especifica o escopo da pesquisa especificada. Somente leitura.
Sintaxe
expression. Scope
Expressão Uma variável que representa um objeto Search .
Comentários
O escopo da pesquisa é definido quando a pesquisa é iniciada. Para obter mais informações, consulte o método AdvancedSearch.
Exemplo
Os seguintes Microsoft exemplo Visual Basic for Applications (VBA) cria um objeto de pesquisa. Do usuário caixa de entrada é especificado como o escopo da pesquisa. A sub-rotina do evento ocorre quando a pesquisa foi concluída e exibe as propriedades de marca e o escopo para o novo objeto, bem como os resultados da pesquisa.
Public blnSearchComp As Boolean
Private Sub Application_AdvancedSearchComplete(ByVal SearchObject As Search)
MsgBox "The AdvancedSearchComplete Event fired for " & SearchObject.Tag & " and the scope was " & SearchObject.Scope
blnSearchComp = True
End Sub
Sub TestAdvancedSearchComplete()
'List all items in the Inbox that do NOT have a flag.
Dim objSch As Outlook.Search
Const strF As String = "urn:schemas:httpmail:messageflag IS NULL"
Const strS As String = "Inbox"
Dim rsts As Outlook.Results
Dim i As Integer
blnSearchComp = False
Const strF1 As String = "urn:schemas:mailheader:subject = 'Test'"
Const strS1 As String = "Inbox"
Set objSch = _
Application.AdvancedSearch(Scope:=strS1, Filter:=strF1, Tag:="FlagSearch")
While blnSearchComp = False
DoEvents
Wend
Set rsts = objSch.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.