Better way to delay macro other than Application.Wait or Application.Sleep?

Question

I created a status bar that works off of application.wait. In a sense, that worked quite well. However, I want to be able to update the status bar while working on other w

Answer 1

Use this delay function instead of Application.Wait

Private Sub delay(seconds As Long)
    Dim endTime As Date
    endTime = DateAdd("s", seconds, Now())
    Do While Now() < endTime
        DoEvents
    Loop
End Sub