I have a program that needs to wait a few seconds for data to upload before it continues, and my code isn't pausing (or running "Get_Stats")
The data is downloaded via development, an I need to pause to make sure it is in before the columns are deleted. Am I missing something? Thank you.

[vba]
Sub Main()

Call Development

Dim RunWhen As Double
Const cRunIntervalSeconds = 5 ' two minutes
Const cRunWhat = "Get_Stats"
RunWhen = Now + TimeSerial(0, 0, cRunIntervalSeconds)
Application.OnTime earliesttime:=RunWhen, procedure:=cRunWhat, schedule:=True

ThisWorkbook.Sheets("Development").Columns("J:BJ").Delete

End Sub
[/vba]