如果你做过 Excel 报表，多半栽过同一个跟头：数字看着挺像回事，交上去才发现背后的数据透视表压根没刷新。
微软其实早就注意到了这个问题。一年前它宣布过一个叫「自动刷新」的功能，但科技媒体 How-To Geek 的作者 Tony Phillips 等到今天，自己的 Excel 版本里还是没见到它。等不下去，他用 VBA 宏自己做了一个。
他要的和微软给的，不是一回事
微软方案的思路是按数据源走：新建的数据透视表默认启用自动刷新，一个开关管住所有连到同一个数据源的透视表。
Phillips 想要的是另一种粒度——按工作簿走。针对某个具体文件打开开关，这个文件里所有的透视表就都自动刷新，跟数据源是哪个无关。
成品他叫它「Live PivotTables」，逻辑很直白：宏存在个人宏工作簿里，绑一个快速访问工具栏按钮。点一下开启，当前工作簿的透视表立刻刷新一次，之后按设定间隔重复；再点一下关闭。开启时会弹出确认框，告诉你正在监控哪个文件、多久刷一次——同时开着好几个表格的时候，这个提示很有必要。
范围他刻意收窄了：只刷新数据透视表，不等同于「全部刷新」命令，因此不会牵动查询刷新、外部连接这些其他操作。
三个关键实现
记住是哪个文件。 宏用一个变量存下开启那一刻的活动工作簿名字，之后所有定时刷新只认这一个文件。多文件并行时不会误伤，关闭时的提示信息也用的同一个名字。这里还埋了个保险：被监控的文件一旦被关掉，宏自动停用，而不是继续引用一个已经不存在的对象。
定时靠 Excel 自己的调度器。 用的是 `Application.OnTime`，默认间隔设成 300 秒，也就是五分钟，测试时他调到 15 秒来快速验证。有个细节值得抄作业：下一次定时不是固定周期触发，而是等上一次刷新真正跑完才安排。他拿一个带数据模型、含多个透视表的文件测过，刷新明显更慢，但宏老老实实等它跑完，没有出现多次刷新叠在一起的情况。
给出可见的反馈。 开启时弹确认框，刷新过程中状态栏显示提示文字，刷完还会多停两秒再清空，避免刷新太快导致提示一闪而过。完整代码原文放在文末，粘进个人宏工作簿的模块里，把开关过程绑到工具栏按钮即可。
测出来的五个副作用
这部分比代码本身更有参考价值——自动刷新不是一个完全隐形的后台过程。他在真实文件上测出五点：
第一，刷新耗时高度依赖文件本身，带数据模型、数据量大、透视表多的文件明显更慢，但跑完之后每个透视表都刷新正确。
第二，刷新期间 Excel 可能短暂无响应，会转圈。
第三，刷新会取消复制状态。正在复制单元格时撞上自动刷新，选区就没了。
第四，正在编辑单元格时到点，Excel 会等你输完再刷，不会打断输入。
第五，刷新之后按撤销，回退不了对源数据的修改——刷新是一个独立操作，不在撤销栈里。
值不值得抄
我的判断是，这件事的价值不在这段代码本身，而在它示范了一种态度：Excel 里最好用的改进，往往是自己给自己加的那些。
一旦个人宏工作簿搭起来，能往里塞的东西就多了——插入固定时间戳、套用自定义格式这类小命令，或者生成可点击的工作表目录、只删除完全空白的行这类稍微复杂的工具，都能变成工具栏上的一个按钮。
当然也得说句公道话：VBA 宏这条路有代价。文件得存成启用宏的格式，换台电脑要重新配，团队协作时别人未必愿意开你的宏。它更适合「自己每天要用几十次」的个人流程，而不是给全组发的模板。
那五条副作用尤其提醒了一件事：自动化不等于无感。把刷新间隔设得太短，写着写着被转圈打断，体验反而更差。五分钟这个默认值，大概率是他试出来的折中。
你的 Excel 里，有没有哪个重复动作值得写成一个按钮？
来源：How-To Geek（作者 Tony Phillips）
