Timimg a Query

[Soma_rich]

Is there any way to time how long a query takes to run. Without using a stop watch and watching the thing .

 

[pdx_man]

You can use VBA.

Public Sub TimeIt()
Dim StartTime, EndTime As Date

    StartTime = Now()
    DoCmd.OpenQuery "Qry_APR_Post"
    EndTime = Now()
    
    MsgBox "Seconds to run query:" & DateDiff("S", StartTime, EndTime)
    
End Sub

 

[Soma_rich]

pdx_man that perfect I really should have got that on my own! Thank you!