我在用STKINDI调用一些公式的数值,调用后,公式数值一直不刷新,不变化。刚学VBA,不知道是什么原因
Call Application.SetTimer(10, 1000)
Set Formula = marketdata.STKINDI("au00","sq","ma(5,10,20,60)",0,0) '
aa=Formula.GetBufData("ma1",Formula.DataSize-1)
Sub APPLICATION_Timer(ID)
If ID = 10 then
call Application.Msgout (aa)
call Application.Msgout ("-------------")
end if
End Sub
消息窗口,总是没变化,要用什么方法数值才不断刷新?
-------------
282.01
-------------
282.01
-------------
282.01
-------------
282.01
-------------
282.01
-------------
282.01
-------------
282.01
-------------
282.01
-------------
282.01
-------------
282.01
-------------
282.01
-------------
282.01
-------------
282.01
-------------