如何從Excel打開特定的Outlook文件夾？

如何從Excel打開特定的Outlook文件夾？ 

您是否曾經嘗試從Excel文件打開特定的Outlook文件夾，例如打開“收件箱”文件夾，“聯系人”文件夾或任何其他文件夾？ 本文，我將討論如何從Excel工作簿中打開所需的Outlook文件夾？

使用VBA代碼從Excel文件中打開特定的Outlook文件夾

使用VBA代碼從Excel文件中打開特定的Outlook文件夾

以下VBA代碼可以幫助您從Excel工作表中打開特定的Outlook文件夾，請按以下步驟操作：

1。 在Excel中，按住 ALT + F11 鍵打開 Microsoft Visual Basic應用程序 窗口。

2。 點擊 插頁 > 模塊，然后將以下宏粘貼到 模塊窗口.

VBA代碼：從Excel文件中打開特定的Outlook文件夾：

Sub OpenOutlookFolder() Dim xOutlookApp As Outlook.Application Dim xNameSpace As Outlook.Namespace Dim xFolder As Outlook.Folder Dim xFolderType As OlDefaultFolders On Error Resume Next Set xOutlookApp = New Outlook.Application Set xNameSpace = xOutlookApp.Session Set xFolder = xNameSpace.GetDefaultFolder(olFolderInbox) xFolder.Display Set xFolder = Nothing Set xNameSpace = Nothing Set xOutlookApp = Nothing Exit Sub End Sub

備注：在上面的代碼中，您可以更改 收件箱 ，在 設置xFolder = xNameSpace.GetDefaultFolder（olFolderInbox） 腳本指向您要打開的任何其他文件夾名稱。

3。 然后，點擊 工具 > 參考資料 ，在 Microsoft Visual Basic應用程序 窗口，彈出 參考-Project1 對話框，檢查 Microsoft Outlook對象庫 選項從 可用參考 列表框，請參見屏幕截圖：

4。 然后，單擊 OK 關閉對話框，然后按 F5 鍵運行此代碼，指定的Outlook文件夾將立即打開。