Outlook (的 AutoFormatRule.) Filter 屬性
會傳回或設定 String 值,代表用於自訂格式化規則的篩選。 讀取/寫入。
expression。 Filter
表達 代表 AutoFormatRule 物件的 變數。
此屬性值為「DAV 搜尋及尋找」(DASL) 字串,代表自訂格式化規則的目前篩選。 如需使用 DASL 篩選由格式化規則格式化後之項目的詳細資訊,請參閱篩選項目。 如果此屬性設定為空白字串,則會將自訂格式化規則套用至檢視顯示的所有項目。
注意
這個屬性會傳回標準格式化規則的空字串, (Standard屬性值設為True) 的AutoFormatRule物件。 如果嘗試對此屬性指派標準格式化規則的值,便會發生錯誤。
下列 Visual Basic for Applications (VBA) 範例會使用Explorer物件的CurrentView屬性取得View物件,然後建立名為 「Handoff Messages」 的新AutoFormatRule。AutoFormatRule物件的Filter屬性已設定,因此格式化規則會套用至Subject 屬性值以 「HANDOFF」 開頭的任何訊息。 然後,此範例會設定AutoFormatRule物件的Font物件屬性,讓套用格式化規則的訊息以藍色、粗體、8 點 Courier New 文字顯示。
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
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。