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

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

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

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

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

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

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