Automatic Data Pull at Certain Times Everyday

[mikeHunt]

I am having trouble with my vba program that is supposed to pull data from 2 databases and then copy and paste the data into a new workbook. The code itself for the data pull and the copy and paste works fine when I run the modules alone. When I put the modules in the automatic timer they seem to get stuck in an infinite loop until an error pops up and stops the program. I am wondering what is causing this.. and is there a better way to go about automating this program. my code for the timer is as follows .

Sub Timer()
Application.OnTime TimeValue("00:00:00"), "Test"
Application.OnTime TimeValue("00:00:00"), "ISMSM"
Application.OnTime TimeValue("00:00:00"), "CopyData"

'This code repeats for 4 times throughout the day

End Sub

 

[Logit]

.
You could try this macro :

Option Explicit


Sub RunMacs()


Test
ISMSM
CopyData


    Application.OnTime Now + TimeValue("00:00:05"), "RunMacs" '<-- currently set to run every 5 seconds


End Sub