标题：[请教] 定时器调用相关请指教

1楼

evalist 发表于：2011/8/19 11:36:29

昨天听说可以用定时器实现监控效果，依照例子写了一个

Sub Application_VBASTART()
call Application.SetTimer(1,1000)
End Sub

Sub APPLICATION_Timer(ID)

application.MsgOut ("你好，你正在使用定时器")

end sub

不知道如何调用这个定时器？

教程里面说 VBASTART() 就是在启动宏的时候加载了定时器，但是为什么我的金字塔下面的消息栏中没有不断刷新"你好" 里面的文档呢？请指教！！！不甚感激

2楼

evalist 发表于：2011/8/19 11:38:22

Sub Application_VBASTART()
call Application.SetTimer(1,1000)
End Sub

Sub APPLICATION_Timer(ID)

if id =1 then

application.MsgOut ("你好，你正在使用定时器")

end if

end sub

PS 就算这样也还是不行····实在不知道如何调用

3楼

王锋发表于：2011/8/19 11:49:51

你修改完代码就根本就再重新启用VBA引擎吧，如果不行重启试试。

此外，金字塔VBA是全局的变量和函数共享方式工作，你检查是否在其他模块和窗体等模块中使用过Application_VBASTART()事件调用

4楼

micro_mok 发表于：2011/8/19 16:28:48

vba那个是setinterval吧，只是遇到启用宏的时候，每过多长时间就会弹窗告诉什么自动保存呀，宏启动之类的

金字塔中的settimer是另外重新封装的

另外不要把excel和金字塔两个程序同时打开（金字塔调用excel对象是另外一回事）

否则你的excel上的宏会出现无提示的出错的

共4 条记录, 每页显示 10 条, 页签: [1]