Search.Filter-Eigenschaft (Outlook)

Artikel
10/16/2024

Gibt einen String -Wert, der die DASL-Anweisung zum Einschränken der Suche auf eine angegebene Teilmenge der Daten darstellt. Schreibgeschützt

Syntax

Ausdruck. Filter

Ausdruck Eine Variable, die ein Search-Objekt darstellt.

Hinweise

Diese Eigenschaft wird als Filter-Argument in der AdvancedSearch-Methode des Application-Objekts festgelegt.

Beim Durchsuchen von Textfeldern können Sie entweder ein Apostroph (') oder doppelte Anführungszeichen ("") um die Werte einzugrenzen, die Teil des Filters sind. Beispielsweise funktionieren alle folgenden Zeilen ordnungsgemäß, wenn das Feld vom Typ String ist:

sFilter = "[CompanyName] = 'Microsoft'"

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

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

Beispiel

Der folgende Microsoft Visual Basic für Applikationen (VBA) wird ein neues Search -Objekt erstellt. Unterroutine des Ereignisses wird ausgelöst, nachdem die Suche abgeschlossen wurde und die Tag - und Filter -Eigenschaften des Search -Objekts sowie die Ergebnisse der Suche zeigt.

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

Verwenden Sie eine AdvancedSearchComplete -Ereignissubroutine, um die Integrität der im Search -Objekt gespeicherten Daten sicherzustellen.

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

Siehe auch

Search-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.

Freigeben über