Create a delay
Brian Element
This little snippet will allow you to delay your code by x number of seconds. Just use the call wait(x) where x is the number of seconds you want the script to pause.
Snippet
Sub Wait(tSecs As Single)
' Timer to create a pause
Dim sngSec As Single
sngSec = Timer + tSecs
Do While Timer < sngSec
Loop
End Sub