Partager via


Search.Scope, propriété (Outlook)

Renvoie une valeur de type String qui détermine la portée de la recherche spécifiée. En lecture seule.

Syntaxe

expression. Scope

Expression Variable qui représente un objet Search .

Remarques

La portée de la recherche est déterminée lors du lancement de la recherche. Pour plus d’informations, consultez la méthode AdvancedSearch .

Exemple

L’exemple suivant, en Microsoft Visual Basic pour Applications (VBA), crée un objet Search. La Boîte de réception de l’utilisateur est spécifiée comme portée de la recherche. La sous-routine d’événement se produit lorsque la recherche est terminée et affiche les propriétés Tag et Scope pour le nouvel objet en plus des résultats de la recherche.

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

Voir aussi

Objet de recherche

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.