录制 Excel 宏：保存为 .xlsm、查看代码、绑定按钮与清理录制结果

适用场景

每天重复同一套格式调整、打印设置、复制粘贴，想先让 Excel 帮你做一遍。录制宏不需要会写代码，Excel 会把操作翻译成 VBA；但录制出来的代码通常很啰嗦，只适合做起点，不适合直接长期使用。

准备工作

1. 打开“开发工具”选项卡：文件 → 选项 → 自定义功能区 → 勾选“开发工具”。
2. 把文件保存为“Excel 启用宏的工作簿（.xlsm）”。.xlsx 保存时会丢掉所有宏。
3. 在“开发工具 → 宏安全性”里确认宏设置。个人电脑可以用“禁用所有宏，并发出通知”，需要时点“启用内容”；不要把安全级别长期设为“启用所有宏”。

录制宏

1. 开发工具 → 录制宏。
2. 填写宏名（不能有空格，建议用英文和数字）、快捷键（可选，Ctrl+Shift+字母）、保存位置：
   • 当前工作簿：只在这个文件里可用；
   • 新工作簿：单独保存；
   • 个人宏工作簿：所有工作簿都能用，保存在隐藏的 PERSONAL.XLSB。
3. 如果需要按当前单元格的相对位置操作，点“使用相对引用”；需要固定操作某个区域时不要点。
4. 执行要录制的操作。
5. 开发工具 → 停止录制。

录制时尽量只做必要操作：少点选、少滚动、少用鼠标右键菜单。录制结束后打开“开发工具 → 宏 → 编辑”，会看到生成的 VBA。

查看与运行

• Alt+F11 打开 VBA 编辑器；
• 在“工程资源管理器”里找到“模块 → Module1”，双击查看代码；
• F5 运行整个过程，F8 单步执行；
• 开发工具 → 宏 → 选中宏 → 运行；
• 绑定按钮：插入 → 形状，右键形状 → 指定宏；也可以把宏加到快速访问工具栏。

录制代码的清理

录制出来的代码经常长这样：

Sub FormatReport()
    Range("A1:D1").Select
    Selection.Font.Bold = True
    Selection.Interior.Color = RGB(220, 230, 241)
End Sub

Select 和 Selection 依赖当前选中的工作表、当前活动区域，换一张表或换一个文件就可能出错。可以改成：

Sub FormatReport()
    With ThisWorkbook.Worksheets("报表").Range("A1:D1")
        .Font.Bold = True
        .Interior.Color = RGB(220, 230, 241)
    End With
End Sub

清理原则：

• 用 ThisWorkbook 明确工作簿，不要依赖 ActiveWorkbook；
• 用 Worksheets("报表") 明确工作表，不要依赖 ActiveSheet；
• 用 With 减少重复对象引用；
• 删除不必要的 .Select 和 Selection；
• 把固定区域、文件名、工作表名提取成变量或常量，方便修改。

宏安全性

• 从网络下载的 .xlsm 会被标记为“来自 Internet”，打开时可能被阻止；在文件属性里“解除锁定”，或把文件放到受信任位置。
• 数字签名可以让用户确认宏来源；企业环境通常用组策略限制宏。
• 不要为了方便长期关闭宏安全提示；只启用你确认来源的文件。
• 宏可以删除文件、改注册表、调用外部程序，运行前先看代码，尤其是别人发来的文件。

易错点

• 保存成 .xlsx：宏全部丢失，Excel 会提示“无法保存 VB 项目”；必须用 .xlsm。
• 相对引用开关忘了关：下一次录制会继承“使用相对引用”的状态，录出来的代码位置偏移。
• 快捷键冲突：Ctrl+Shift+字母 可能和 Excel 自带快捷键或其他宏冲突；绑定按钮更稳。
• 录制时切换了工作表：代码会记录 ActiveSheet 的切换，回放时容易操作错表；清理时明确工作表。
• 个人宏工作簿不可见：PERSONAL.XLSB 是隐藏文件，修改后要保存；换电脑不会自动带走。
• 宏被禁用：文件打开后没有“启用内容”按钮，检查信任中心、组策略和文件是否被阻止。
• 64 位 Office 的 API 声明：旧代码里的 Declare 语句在 64 位 Office 上要加 PtrSafe，否则编译报错。

相关条目

• vba-basics — VBA 编辑器、变量与过程
• vba-range-cells — 用代码操作单元格
• vba-error-handling — 让宏出错时能恢复
• vba-workbook — 批量打开、保存和关闭工作簿
• Office 快捷键 — Excel 与 VBA 编辑器键位

参考链接

• Microsoft Learn: Excel VBA 对象模型

读完自测

合上页面，先回答，再展开对照。

1. 为什么录制好的宏保存成 .xlsx 后消失了？
2. 录制代码里的 Selection 为什么容易出错？
3. 个人宏工作簿保存在哪里，有什么特点？