如何将Excel默认保存对话框改为直接使用Windows资源管理器的“浏览”选项
如何将Excel默认保存对话框改为直接使用Windows资源管理器的“浏览”选项
我完全懂你的困扰!那个Excel 365的默认保存对话框确实够别扭的——只能显示最近几个文件夹,点“更多选项”后体验也拉胯,连Alt+D快速跳转路径的功能都没有,折腾半天才能打开熟悉的Windows资源管理器界面。下面有两种靠谱的方法帮你解决这个问题:
方法一:修改注册表(全局生效,一步到位)
这个方法能直接禁用Excel的现代保存对话框,让它默认就打开传统的Windows资源管理器“浏览”界面,所有Excel文件都会生效:
- 按下Win+R组合键,输入
regedit打开注册表编辑器(注意:修改注册表前建议备份,避免误操作) - 在注册表中导航到路径:
HKEY_CURRENT_USER\Software\Microsoft\Office\16.0\Excel\Options(16.0对应Office 365版本,Office 2019/2016也是这个版本号) - 右键点击
Options项,选择「新建」→「DWORD(32位)值」,命名为DisableModernSaveDialog - 双击这个新建的DWORD值,把「数值数据」改成
1,点击确定 - 重启Excel,现在再按Ctrl+S或者点击保存按钮,就会直接弹出熟悉的Windows资源管理器保存对话框了!
方法二:用VBA宏自定义保存行为(灵活可控)
如果不想动注册表,或者只想让特定工作簿生效,可以用VBA宏替换默认的保存操作:
- 打开Excel,按下Alt+F11打开VBA编辑器
- 在左侧的「工程资源管理器」里,找到当前工作簿(或者个人宏工作簿
Personal.xlsb,这样所有工作簿都能生效),右键选择「插入」→「模块」 - 在模块里粘贴以下代码:
Sub SaveWithExplorerDialog() Dim savePath As Variant ' 调用Windows资源管理器风格的保存对话框,支持常用Excel格式 savePath = Application.GetSaveAsFilename( _ FileFilter:="Excel Workbook (*.xlsx), *.xlsx, Excel Macro-Enabled Workbook (*.xlsm), *.xlsm, Excel Binary Workbook (*.xlsb), *.xlsb") If savePath <> False Then ThisWorkbook.SaveAs Filename:=savePath End If End Sub
- 保存工作簿(如果是个人宏工作簿,它会自动在后台加载)
- 回到Excel界面,右键点击顶部的快速访问工具栏,选择「自定义快速访问工具栏」
- 在「从下列位置选择命令」下拉框里选「宏」,找到刚才创建的
SaveWithExplorerDialog,添加到右侧列表 - 还可以点击「修改」按钮给这个宏换个保存图标,甚至把原来的默认保存按钮替换掉,这样点击保存就会触发这个宏了
备注:内容来源于stack exchange,提问作者BateTech




