VBA – Wait, Delay, Create a Timer While Running Code
Wait or Delay in VBA
There are many instances when a timer could be useful in Excel, here is one method to try:
Application.Wait Now + TimeValue("00:00:05")
MsgBox ("5 seconds")
A couple uses of a timer in Excel VBA are pausing code and measuring elapsed time. The following will take you to the respective place I’ve posted an example of each use:
VBA Coding Made Easy
Stop searching for VBA code online. Learn more about AutoMacro – A VBA Code Builder that allows beginners to code procedures from scratch with minimal coding knowledge and with many time-saving features for all users!
Wait or Delay in Access VBA
You can also use the methods above in Access VBA. For example, you might like to know how long it takes to move through a recordset.
Dim Count As Long
Dim BenchMark As Double
BenchMark = Timer
'Start of Code to Test
Set dbs = CurrentDb
Set rst = dbs.OpenRecordset("tblInvoices", dbOpenDynaset)
Do Until .EOF = True
'End of Code to Test
MsgBox "It took " & Timer - BenchMark & " seconds to loop"