vba自动执行问题

100018916

我想在每天21点这个时间，VBA自动执行CL这个过程，哪里错了，如何修改
Sub APPLICATION_VBAStart()
        if Cdate(Time)=Cdate("21:00") then
        call cl
        end if
End Sub

sub cl()
过程内容
end sub

技术008

设一个定时器就好了

100018916

技术008 发表于 2022-10-28 08:59
设一个定时器就好了

不好意思，还是不会啊。能不能写一段代码给我。VBA不太会用啊。。。

技术008

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 if
End Sub

技术008

另外不太理解，你如果对vba很不熟悉为什么要用vba呢
这种程序开发需要一定的编程基础，如果一点都没的，不建议使用

100018916

技术008 发表于 2022-10-28 16:21
另外不太理解，你如果对vba很不熟悉为什么要用vba呢
这种程序开发需要一定的编程基础，如果一点都没的，不 ...

因为好多我想要的功能，比如板块改名整理等运作pel无法实现啊。

艳阳天:VBA

vba对板块操作，我做的比较多。而且确实只有vba能比较全面支持，其他pel，python都不能很好地实现。

vx:guotx-