客户有问题 先对论坛进行一下搜索,你提过的问题可能以前已经有人提过,直接找答案用就是了
Sub Application_VBAStart() Call Application.SetTimer(0,2*1000) '设置一个0号计时器,间隔2秒执行一次 Call Application.Settimer(9,5*1000) '设置一个9号计时器,间隔5秒执行一次End Sub '下面的过程是计时器循环体,我让计时器显示每次触发的时间,你看看是不是间隔设定的秒数就触发。 Sub Application_Timer(ID) If ID=0 then Application.msgout Cdate(time) & ",0号计时器触发了" end if If ID=9 then Application.msgout Cdate(time) & ",9号计时器触发了" end ifEnd Sub
[此贴子已经被作者于2013-3-22 13:28:27编辑过]
非常详细,敬礼!嗨希特勒!
[此贴子已经被作者于2013-3-22 13:30:48编辑过]