How to pause the execution of vba script?

Public Sub

‘Stops the execution of the code and continues after 10 seconds.
Application.Wait Now + TimeValue("00:00:10")

End sub