AutoFormatRule.Filter-Eigenschaft (Outlook)
Gibt zurück oder legt einen String -Wert, der den Filter für eine benutzerdefinierte Formatierungsregel darstellt. Lese-/Schreibzugriff.
Syntax
Ausdruck. Filter
Ausdruck Eine Variable, die ein AutoFormatRule-Objekt darstellt.
Hinweise
Der Wert dieser Eigenschaft ist eine DASL-Zeichenfolge (DAV Searching and Locating), die den aktuellen Filter für die benutzerdefinierte Formatierungsregel darstellt. Weitere Informationen zum Verwenden von DASL zum Filtern von Elementen, die mit der Formatierungsregel formatiert wurden, finden Sie unter Filtern von Elementen. Wenn Sie diese Eigenschaft auf eine leere Zeichenfolge festlegen, wird die benutzerdefinierte Formatierungsregel auf alle in der Ansicht angezeigten Elemente angewendet.
Hinweis
Diese Eigenschaft gibt eine leere Zeichenfolge für eine Standardformatierungsregel zurück (ein AutoFormatRule-Objekt mit einem Standard-Eigenschaftswert , der auf True festgelegt ist). Wenn Sie versuchen, dieser Eigenschaft einen Wert für eine Standardformatierungsregel zuzuweisen, tritt ein Fehler auf.
Beispiel
Im folgenden beispiel für Visual Basic for Applications (VBA) wird mithilfe der CurrentView-Eigenschaft des Explorer-Objekts ein View-Objekt abgerufen und anschließend eine neue AutoFormatRule mit dem Namen "Übergabenachrichten" erstellt. Die Filter-Eigenschaft des AutoFormatRule-Objekts wird so festgelegt, dass die Formatierungsregel für jede Nachricht gilt, in der der Subject-Eigenschaftswert mit "HANDOFF" beginnt. Klicken Sie dann die Eigenschaften des Font -Objekts für das AutoFormatRule -Objekt festgelegt der, damit Nachrichten, die auf den die Formatierungsregel angewendet wird in blau angezeigt werden, fett, 8 Punkt Courier New Text.
Private Sub FormatHandoffMessages()
Dim objView As TableView
Dim objRule As AutoFormatRule
' Check if the current view is a table view.
If Application.ActiveExplorer.CurrentView.ViewType = olTableView Then
' Obtain a TableView object reference to the current view.
Set objView = Application.ActiveExplorer.CurrentView
' Create a new rule that displays any message with a
' subject line that starts with "HANDOFF" in
' blue, bold, 8 point Courier New text.
Set objRule = objView.AutoFormatRules.Add("Handoff Messages")
With objRule
.Filter = """http://schemas.microsoft.com/mapi/proptag/0x0037001f""" & _
" CI_STARTSWITH 'HANDOFF'"
With .Font
.Name = "Courier New"
.Size = "8"
.Bold = True
.Color = olColorBlue
End With
End With
' Save and apply the table view.
objView.Save
objView.Apply
End If
End Sub
Siehe auch
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.