通过

Application.Explorers 属性 (Outlook)

  • 项目

返回 浏览器 集合对象，该对象包含表示所有打开的浏览器中的 资源管理器 对象。 此为只读属性。

语法

expression。 Explorers

expression：表示 Application 对象的变量。

示例

以下 Microsoft Visual Basic for Applications (VBA) 示例显示已打开的资源浏览器窗口的数目。

Private Sub CountExplorers() 
 
 MsgBox "There are " & _ 
 
 Application.Explorers.Count & " Explorers." 
 
End Sub

以下 VBA 示例使用 Selection 属性返回的 Selection 集合的 Count属性和Item 方法显示资源管理器中选择的所有邮件项的发件人，这些邮件项目显示在显示收件箱的资源管理器中。 若要运行此示例，显示收件箱的浏览器中必须选定至少一个邮件项目。 如果选择非邮件项目，例如任务要求，则可能发生错误，因为 TaskRequestItem 对象不存在 SenderName 属性。

Sub GetSelectedItems() 
 
 Dim myOlExp As Outlook.Explorer 
 
 Dim myOlSel As Outlook.Selection 
 
 Dim MsgTxt As String 
 
 Dim x As Integer 
 
 
 
 MsgTxt = "You have selected items from: " 
 
 Set myOlExp = Application.Explorers.Item(1) 
 
 If myOlExp = "Inbox" Then 
 
 Set myOlSel = myOlExp.Selection 
 
 For x = 1 To myOlSel.Count 
 
 MsgTxt = MsgTxt & myOlSel.Item(x).SenderName & ";" 
 
 Next x 
 
 MsgBox MsgTxt 
 
End If 
 
End Sub

另请参阅

Application 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。