Search.Save, méthode (Outlook)

Enregistre les résultats de la recherche dans un Dossier de recherche.

Syntaxe

expression. Save (SchFldrName)

expression Variable qui représente un objet Search .

Paramètres

Remarques

La méthode Save affiche une erreur si un Dossier de recherche portant le même nom existe déjà.

Exemple

L’exemple Microsoft Visual Basic pour Applications (VBA) suivant recherche dans la boîte de réception des éléments dont la ligne Objet est égale à « Test » et enregistre les résultats dans un dossier de recherche. La AdvanceSearchComplete procédure événementielle définit la valeur BooleanblnSearchComp sur True une fois la recherche terminée. Cette variable booléenne est utilisée par la TestAdvancedSearchComplete() procédure pour déterminer quand la recherche est terminée. L’exemple de code doit être placé dans un module de classe tel que ThisOutlookSession, et la TestAdvancedSearchComplete() procédure doit être appelée avant que la procédure événementielle puisse être appelée par 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 
 
 sch.Save("Subject Test") 
 
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.