如何从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文件夹将立即打开。