自动化运行宏时如何规避电脑休眠问题？

这个问题我之前帮朋友处理过，核心原因很明确：Excel的Application.OnTime完全依赖Excel进程处于活跃状态——当电脑进入休眠模式时，系统会暂停所有非必要进程，Excel也会被挂起，自然没法按时触发你的定时任务。下面给你几个靠谱的解决方案，按实用性排序：

方案1：用Windows任务计划器替代Excel内置定时（最推荐） #

任务计划器是系统级的工具，不仅可以绕过Excel的限制，还能唤醒休眠的电脑来执行任务，稳定性拉满。具体步骤如下：

1. 准备宏文件：确保你的宏保存为启用宏的工作簿（.xlsm格式），并且TheScheduledSub是公开的（不要加Private修饰）。
2. 写一个VBS脚本：创建一个.vbs后缀的文本文件，内容如下（记得替换文件路径）：

Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = False ' 若需要看到运行过程，可改为True
Set objWorkbook = objExcel.Workbooks.Open("C:\你的文件路径\你的工作簿.xlsm")
objExcel.Run "TheScheduledSub"
objWorkbook.Close SaveChanges:=True ' 根据需求设置是否保存修改
objExcel.Quit
Set objWorkbook = Nothing
Set objExcel = Nothing

3. 创建任务计划：
   • 打开Windows「任务计划器」，点击右侧「创建基本任务」。
   • 按向导设置：
     • 名称随便填，比如「每日运行Excel宏」；
     • 触发条件选「每天」，设置时间为12:00，勾选周末也运行；
     • 操作选「启动程序」，程序/脚本选wscript.exe，添加参数填你的VBS脚本完整路径（比如"C:\你的脚本路径\run_macro.vbs"，路径有空格必须加引号）；
     • 最后进入任务的「属性」→「条件」选项卡，勾选**「唤醒计算机运行此任务」**，这是关键！

方案2：调整电源设置，禁止周末休眠 #

如果不想用任务计划器，最简单的办法就是让电脑在周末不休眠：

• 打开Windows「控制面板」→「硬件和声音」→「电源选项」；
• 点击当前使用的电源计划旁的「更改计划设置」；
• 把「使计算机进入睡眠状态」的选项，在「用电池」和「接通电源」下都改成「从不」；
• 如果你平时需要休眠，可以创建一个专门的「周末电源计划」，手动切换，或者用任务计划器自动切换电源计划（这个属于进阶操作）。

方案3：用代码防止电脑休眠（不推荐，仅临时应急） #

这个方法是让Excel每隔一段时间模拟操作，欺骗系统认为电脑在被使用，从而避免休眠。但缺点是Excel必须一直开着，而且如果手动休眠了还是没用：

修改你的宏代码，添加一个防休眠的子过程：

Sub Scheduler()
    Application.OnTime TimeValue("12:00:00"), "TheScheduledSub"
    PreventSleep ' 启动防休眠任务
End Sub

Sub TheScheduledSub()
    MsgBox "TheScheduledSub() has run at " & Time
    ' 任务完成后可以取消防休眠
    On Error Resume Next
    Application.OnTime Now + TimeValue("00:10:00"), "PreventSleep", , False
End Sub

Sub PreventSleep()
    ' 模拟按Scroll Lock键，触发系统的活跃检测
    SendKeys "{SCROLLLOCK}", True
    ' 每隔10分钟重复一次
    Application.OnTime Now + TimeValue("00:10:00"), "PreventSleep"
End Sub

注意事项 #

• 用任务计划器时，确保你的Windows账户有足够权限，Excel的宏安全设置不要阻止外部脚本运行；
• VBS脚本里的文件路径一定要准确，不要有中文空格（如果有必须加引号）；
• 如果是笔记本电脑，唤醒功能可能需要在BIOS里开启「允许唤醒」的选项。

内容的提问来源于stack exchange，提问作者Anthony