EXCEL利用VBA编程可以实现强大的功能，我之前做了一些基于VBA的程序，实现数据采集、生成图片报表等功能，将这些程序放到服务器定时执行，原考虑用VBA ontime 函数实现，但是有10几个EXCEL文件和自带程序，运行占内存且问题估计会比较多。

考虑用Python制作一个定时器，到指定时间打开excel，执行excel宏，然后再关闭excel

经过查阅资料，最终成功实现程序如下：

1、定时部分：

def dingshi():
    from datetime import datetime
    ttime1=28800 #早上8：00，转化为秒
    ttime2=61200 #下午5：00，转化为秒
    print( "定时程序已启动，启动时间："+datetime.now().strftime( '%Y-%m-%d %H:%M:%S'))
    while True:
        hh = datetime.now().hour
        mm = datetime.now().minute
        ss = datetime.now().second
        zm = hh*3600+mm*60+ss #当前时间，转化为秒
        time.sleep(1) #延时间隔1秒
        if zm == ttime1 or zm == ttime2: #此处设置每天定时的时
            jivy()

2、启动EXCEL、运行宏、关闭EXCEL

def jivy():
    xl = win32com.client.Dispatch("Excel.Application")
    xl.Workbooks.Open(Filename="E:\\服务器\\fengchuang7.xlsm", ReadOnly=1)
    try:
        xl.Application.Run("fengchuang7.xlsm!模块2.moju")
        xl.Workbooks(1).Close(SaveChanges=0)
        xl.Application.Quit()
        xl = 0
        print("模具状态更新程序已执行")
    except:
        xl.Workbooks(1).Close(SaveChanges=0)
        xl.Application.Quit()
        xl = 0

全部代码

import win32com.client
import time
def jivy():
    xl = win32com.client.Dispatch("Excel.Application")
    xl.Workbooks.Open(Filename="E:\\服务器\\jivy7.xlsm", ReadOnly=1)
    try:
        xl.Application.Run("jivy.xlsm!模块2.moju")
        xl.Workbooks(1).Close(SaveChanges=0)
        xl.Application.Quit()
        xl = 0
        print("程序已执行")
    except:
        xl.Workbooks(1).Close(SaveChanges=0)
        xl.Application.Quit()
        xl = 0
def dingshi():
    from datetime import datetime
    ttime1=28800 #早上8：00，转化为秒
    ttime2=61200 #下午5：00，转化为秒
    print( "定时程序已启动，启动时间："+datetime.now().strftime( '%Y-%m-%d %H:%M:%S'))
    while True:
        hh = datetime.now().hour
        mm = datetime.now().minute
        ss = datetime.now().second
        zm = hh*3600+mm*60+ss #当前时间，转化为秒
        time.sleep(1) #延时间隔1秒
        if zm == ttime1 or zm == ttime2: #此处设置每天定时的时
            jivy()
dingshi()

说明：需要 win32com.client 模块 pip install pypiwin32