Outlook (Application.ActiveExplorer 方法)

回傳桌面上最頂端 的檔案總管 物件。

語法

expressionActiveExplorer

expression 代表 Application 物件的變數。

傳回值

代表桌面上最上層檔案總管的 Explorer。 如果沒有使用中的檔案總管,則會傳回 Nothing

註解

使用此方法來傳回使用者很有可能檢視的 Explorer 物件。 此方法對於判斷何時沒有作用中的瀏覽器也很有用,從而可以開啟新的物件。

範例

以下Microsoft Visual Basic for Applications (VBA) 範例,使用Select集合的Count屬性與Item方法,由Select屬性回傳,顯示在活動檔案總管視窗中選取的所有郵件項目的寄件人。 若要執行此範例,至少必須在使用中檔案總管視窗中選定一個郵件項目。

注意事項

如果你選擇了郵件以外的項目,例如任務請求,可能會收到錯誤,因為 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.ActiveExplorer 
 
 Set myOlSel = myOlExp.Selection 
 
 For x = 1 To myOlSel.Count 
 
 MsgTxt = MsgTxt & myOlSel.Item(x).SenderName & ";" 
 
 Next x 
 
 MsgBox MsgTxt 
 
End Sub

另請參閱

Application 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應