欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件高级功能研发区 → [求助]VBA如何实现每天特定时间执行一个动作?

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


  共有9658人关注过本帖树形打印复制链接

主题:[求助]VBA如何实现每天特定时间执行一个动作?

帅哥哟,离线,有人找我吗?
guotx2010
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:蜘蛛侠 帖子:1366 积分:5210 威望:0 精华:7 注册:2010/12/11 18:00:33
  发帖心情 Post By:2012/3/23 17:23:51 [显示全部帖子]

使用定时器

在Application_VBAStart过程增加下面的定时器

Call Application.SetTimer(1,300*1000)     '每隔30分执行一次

 

Sub Application_Timer(ID)
    if Cdate(time)="08:00:00" then

           ...

    end if
End Sub

 

至于账户权益,可以使用Order.Account2(6,Account)来获取,然后就是发送到你的邮箱的代码了。

 

[此贴子已经被作者于2012-3-23 17:30:49编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
guotx2010
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:蜘蛛侠 帖子:1366 积分:5210 威望:0 精华:7 注册:2010/12/11 18:00:33
  发帖心情 Post By:2012/3/24 18:22:17 [显示全部帖子]

自己算好时间呀,30分可以改为20分的。

 回到顶部
帅哥哟,离线,有人找我吗?
guotx2010
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:蜘蛛侠 帖子:1366 积分:5210 威望:0 精华:7 注册:2010/12/11 18:00:33
  发帖心情 Post By:2012/3/25 18:06:28 [显示全部帖子]

时间间隔可以调到足够小呀,比如10秒执行一次,那么肯定会执行到的,你也可以使用一个时间范围,比如,8:00-8:30这样,错开的机会就更小了。

总值一句话,人是足够聪明的动物,不要自己把自己憋死了。

时间间隔过大会漏掉,过小会导致系统占用资源过大,我们需要在这两种情况中平衡。

 


 回到顶部
帅哥哟,离线,有人找我吗?
guotx2010
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:蜘蛛侠 帖子:1366 积分:5210 威望:0 精华:7 注册:2010/12/11 18:00:33
  发帖心情 Post By:2012/8/24 16:41:34 [显示全部帖子]

sub vbastart()
错了

改为:

sub Application_VBAStart()

 


 回到顶部