Time Delay Code in Visual Basic for Applications

Overview of time delay code

Below is code listing for time delay in Visual Basic for Applications (or VBA). Basically, it pauses a program for a certain amount of seconds. So for ten seconds, you would enter TimeDelay(10).

Private Sub TimeDelay(secs As Integer)
    Dim startTime
    
    startTime = Timer
    Do While Timer < startTime + secs
        DoEvents
    Loop
End Sub

Private Sub TimeDelay(secs As Integer)
    Dim startTime
    
    startTime = Timer
    Do While Timer < startTime + secs
        DoEvents
    Loop
End Sub

Related

• Draw Statement – BASIC Reference
• Show Developer Ribbon in Excel – How to
• The Graphics Power Diskette (1996 Demo)