以下代码对吗,每5秒执行一次Sheet1.GetData宏,要怎么改,求完整的代码,可以的话每条语句注释一下。
Private Sub Workbook_Open()
Call Sheet1.GetData
End Sub
Sub GetData()
NewTime = Now + TimeValue("00:00:05")
For i = 0 To 12
Application.OnTime Now + TimeValue("00:00:05"), "GetData"
Next
End Sub
刚才给的就是完整代码,你现在的GetData函数语句替换下面的省略号即可:
Private Sub Workbook_Open()