KutoolsforOffice — 一套方案,五大工具。事半功倍。

如何在 Outlook 中调出用于选择文件夹的“浏览文件夹”对话框?

作者Siluvia修改日期

如果您的 Outlook 中包含大量文件夹,使用“浏览文件夹”对话框选择目标文件夹,将比在文件夹结构中逐一查找更为便捷。本文将为您介绍如何在 Outlook 中调出“浏览文件夹”对话框,以便轻松选择所需文件夹。

通过 VBA 显示用于选择文件夹的“浏览文件夹”对话框
使用强大工具轻松显示用于选择文件夹的“浏览文件夹”对话框


通过 VBA 显示用于选择文件夹的“浏览文件夹”对话框

请按照以下步骤,使用 VBA 代码调出“浏览文件夹”对话框,以便选择文件夹。

1. 请按下 Alt+F11 组合键,即可打开 Microsoft Visual Basic for Applications 窗口。

2. 在 Microsoft Visual Basic for Applications 窗口中,点击插入 > 模块,然后将以下 VBA 代码复制到模块窗口中。

VBA 代码:显示用于选择文件夹的“浏览文件夹”对话框

Sub PickFolder()
'Update by Extendoffice 20180504
Dim xNameSpace As NameSpace
Dim xPickFolder As Folder
Dim xExplorer As Explorer
On Error Resume Next
Set xNameSpace = Outlook.Application.Session
Set xPickFolder = xNameSpace.PickFolder
If TypeName(xPickFolder) = "Nothing" Then Exit Sub
Set xExplorer = Outlook.Application.ActiveExplorer
xExplorer.Close
xPickFolder.Display
Outlook.Application.ActiveExplorer.WindowState = olMaximized
Set xPickFolder = Nothing
Set xNameSpace = Nothing
End Sub

3. 请按下 Alt+Q 组合键,即可退出 Microsoft Visual Basic for Applications 窗口。

4. 单击自定义快速访问工具栏按钮,然后点击下拉菜单中的更多命令选项。见下图:

在 Outlook 中使用 vba 显示“浏览文件夹”对话框以选择文件夹的步骤

5. 在 Outlook 选项对话框中,您需要:

5.1 选择,在从下列位置选择命令下拉列表;
5.2 选择宏名称 Project 1.FolderPick,在命令框中;
5.3 单击添加按钮;
5.4 保持选择 FolderPick,在右侧自定义快速访问工具栏框中,然后单击修改按钮;
5.5 为该宏选择一个修改按钮,然后点击确定按钮;
5.6 单击确定按钮以关闭 Outlook 选项对话框。见下图:
在 Outlook 中使用 vba 显示“浏览文件夹”对话框以选择文件夹的步骤

6. 此时,您会在快速访问工具栏上看到一个文件夹按钮。点击该按钮,即可弹出“选择文件夹”对话框,选择所需文件夹后,单击确定按钮。见下图:

在 Outlook 中使用 vba 显示“浏览文件夹”对话框以选择文件夹的步骤

所选文件夹将会立即在 Outlook 中打开。


使用强大工具轻松显示用于选择文件夹的“浏览文件夹”对话框

👉 在 Outlook 中更高效地工作!下载 Kutools for Outlook,体验 100+ 项省时功能,助力提升办公效率——30 天免费试用!

上述方法操作起来似乎不够简便。这里推荐 Kutools for Outlook打开指定 Outlook 文件夹工具。通过该功能,您可以在 Outlook 中打开包含所有文件夹或特定文件夹类型的对话框,轻松切换至所需文件夹。

1. 安装 Kutools for Outlook 后,点击 KUTOOLS PLUS 选项卡中的转到,即可启用该功能。

在 Outlook 中使用 kutools for outlook 显示“浏览文件夹”对话框以选择文件夹的步骤

2. 在打开的转到对话框中,请按以下方式设置。

2.1)默认情况下会选中所有文件夹类型,您也可以根据需要,选择某一指定类型类型,仅列出该类文件夹;
2.2)您可在搜索框中输入文件夹名称以快速查找文件夹;
2.3)在文件夹列表中双击文件夹可直接进入并关闭对话框。
或者,您可以选中文件夹后点击确定按钮来打开文件夹并关闭对话框。
在 Outlook 中使用 kutools for outlook 显示“浏览文件夹”对话框以选择文件夹的步骤

相关文章:


最佳办公效率工具

🤖KUTOOLS AI 助手:基于数据分析革新智能执行   |  生成代码|  创建自定义公式  |  数据分析及生成图表|  调用 Kutools Functions……
热门功能查找、高亮或标记重复项   |  删除空白行   |  合并列或单元格且不丢失数据   |  不使用公式的四舍五入……
高级 LOOKUP多条件 VLookup  |  多值 VLookup  |   跨多表 VLookup   |   模糊查找……
高级下拉列表快速创建下拉列表   |  依赖下拉列表   |  多选下拉列表……
列管理器添加指定数量的列|移动列|切换隐藏列的可见状态|比较区域和列……
精选功能网格聚焦   |  设计视图   |增强编辑栏   | 工作簿和表管理器   |  资源库(自动文本)|  日期提取   |  汇总工作表  |  加密/解密单元格   | 按列表批量发送邮件   |  超级筛选   |   特殊筛选(筛选粗体单元格/斜体/删除线等) ......
顶级 15 工具集12 文本工具添加文本删除特定字符,……)|   50+ 图表 类型甘特图,……)|   40+ 实用公式基于生日计算年龄,……)|   19 插入工具插入二维码按路径插入图片,……)|   12 转换工具小写金额转大写汇率转换,……)|   7 合并和拆分工具高级合并行分割单元格,……)|…… 以及更多
在您的首选语言中使用 Kutools——支持英语、西班牙语、德语、法语、中文及 40+ 种其它语言!

用 Kutools for Excel 全面提升您的 Excel 技能,体验前所未有的高效办公。Kutools for Excel 提供 300 多项高级功能,助您高效提升工作效率,节省宝贵时间。点击此处,立即获取您最需要的功能……


Office Tab 为 Office 带来标签式界面,让您的工作更加轻松高效

  • 在 Word、Excel、PowerPoint 中启用标签式编辑与阅读,同样适用于 Publisher、Access、Visio 和 Project。
  • 在同一窗口中以新标签页的形式打开和创建多个文档,而无需另起新窗口。
  • 让您的工作效率提升 50%,每天为您减少上百次鼠标点击!

所有 Kutools 插件,一键安装

Kutools for Office 套件集成了 Excel、Word、Outlook 和 PowerPoint 插件,以及 Office Tab Pro,非常适合需要跨 Office 应用协作的团队。

ExcelWordOutlookTabsPowerPoint
  • 全能套件— Excel、Word、Outlook 及 PowerPoint 插件 + Office Tab Pro
  • 一键安装,一证多用— 数分钟完成部署(支持 MSI)
  • 协同更高效— 实现 Office 应用间高效协作
  • 30 天完整功能试用— 无需注册,无需信用卡
  • 极致性价比— 比单独购买插件更省钱