如何从Excel打开特定的Outlook文件夹

原文：https://www.extendoffice.com/zh-CN/documents/excel/5510-open-outlook-folder-from-excel.html

如何从Excel打开特定的Outlook文件夹？

您是否曾尝试从Excel文件中打开特定的Outlook文件夹，例如打开收件箱文件夹，联系人文件夹或任何其他文件夹？ 本文，我将讨论如何从Excel工作簿中打开所需的Outlook文件夹？

使用VBA代码从Excel文件打开特定的Outlook文件夹

---

 使用VBA代码从Excel文件打开特定的Outlook文件夹

以下VBA代码可以帮助您从Excel工作表中打开特定的Outlook文件夹，请执行以下操作：

1。 在Excel中，按住 ALT + F11 键打开 Microsoft Visual Basic for Applications 窗口。

2。 点击 插页 > 模块，并粘贴在下面的宏 模块窗口.

VBA代码：从Excel文件中打开特定的Outlook文件夹：

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

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 for Applications 窗口中弹出 参考-Project1 对话框，检查 Microsoft Outlook对象库 选项从 可用的参考 列表框，看截图：

4。 然后点击 OK 关闭对话框，然后按 F5 键运行此代码，并立即打开指定的Outlook文件夹。