Outlook) (搜索对象
包含有关对 Outlook 项目执行的各种搜索的信息。
备注
Search 对象包含的属性定义了搜索类型和搜索本身的参数。
使用 应用程序 对象的 AdvancedSearch 方法返回 搜索 对象。
使用 AdvancedSearchComplete 事件可确定指定搜索完成的时间。
示例
下面的 Microsoft Visual Basic for Applications (VBA) 示例返回名为"SubjectSearch"的搜索对象和显示对象的 标记 和 筛选器 属性值。 Tag 属性用于标识特定的搜索完成后。
Sub SearchInboxFolder()
'Searches the Inbox
Dim objSch As Search
Const strF As String = _
"urn:schemas:mailheader:subject = 'Office Christmas Party'"
Const strS As String = "Inbox"
Const strTag As String = "SubjectSearch"
Set objSch = Application.AdvancedSearch(Scope:=strS, _
Filter:=strF, SearchSubFolders:=True, Tag:=strTag)
End Sub
以下 VBA 示例显示搜索的相关信息和搜索的结果。
Private Sub Application_AdvancedSearchComplete(ByVal SearchObject As Search)
Dim objRsts As Results
MsgBox "The search " & SearchObject.Tag & "has completed.
Set objRsts = SearchObject.Results
'Print out number in Results collection
Debug.Print objRsts.Count
'Print out each member of Results collection
For Each Item In objRsts
Debug.Print Item
Next
End Sub
方法
名称 |
---|
GetTable |
Save |
停止 |
属性
名称 |
---|
Application |
类 |
Filter |
IsSynchronous |
Parent |
结果 |
范围 |
SearchSubFolders |
Session |
Tag |
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。
反馈
https://aka.ms/ContentUserFeedback。
即将发布:在整个 2024 年,我们将逐步淘汰作为内容反馈机制的“GitHub 问题”,并将其取代为新的反馈系统。 有关详细信息,请参阅:提交和查看相关反馈