如何自动定时运行宏

zyx999

此为将表转换为邮件发出的宏。
想让这个宏在每天早晨8点自动运行，也就是可以自动发出。
求助大神，可以怎么实现呢

在网上查用这个方法没有动静呢
Private Sub Workbook_Open()
Application.OnTime TimeValue("15:30:00"), "sendmail"
End Sub

zyx999

。

xiakor

关闭Excel，无法实现吧，因为没有触发条件。

zyx999

xiakor 发表于 2020-5-5 15:56
关闭Excel，无法实现吧，因为没有触发条件。

那打开的情况下怎么可以实现呢

zjdh

打开你的这个文件后关闭，但Excel不可退出，这样能够运行一次，若要每天运行，还得将
Application.OnTime TimeValue("15:30:00"), "sendmail"  
放在sendmail宏里：
Sub sendmail()
......
Application.OnTime TimeValue("15:30:00"), "sendmail"
End Sub

0126

zyx999 发表于 2020-5-5 16:05
那打开的情况下怎么可以实现呢

嗯在打开工作蒲事件 程序里判断是否运行这个宏，要是需要就运行你这个宏程序，

如何判断你可以把判断值放入单元格或者注册表，运行前读取，运行后保存，

cutecpu

工作排程里面，使用 Excel 命令列:

例: "c:\Program Files\Microsoft Office\OFFICE14\EXCEL.EXE" /e sendmail.xlsm

蓝色: EXCEL.EXE 完整路径
橘色: 命令列参数
红色: 含有可执行 Workbook_Open 的 檔案

祝順心，南無阿彌陀佛！

zyx999

0126 发表于 2020-5-6 18:02
嗯在打开工作蒲事件 程序里判断是否运行这个宏，要是需要就运行你这个宏程序，

如何判断你可以把判断 ...

打开的情况没有反应，不运行

zyx999

cutecpu 发表于 2020-5-6 19:10
工作排程里面，使用 Excel 命令列:

例: "c:\Program Files\Microsoft Office\OFFICE14\EXCEL.EXE" /e se ...

感觉有点厉害。电脑没有工作排程器。是和 任务计划程序 一样的吗

cutecpu

zyx999 发表于 2020-5-7 14:02
感觉有点厉害。电脑没有工作排程器。是和 任务计划程序 一样的吗

对，就是 windows「任务计划程序」