共用方式為

(Outlook) 的 Application.Explorers 屬性

  • 發行項

會傳回 Explorers 集合物件，其中包含代表所有開啟總管的 Explorer 物件。 唯讀。

語法

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 支援與意見反應。