Problem with consistent "Application.Wait (Now + TimeValue("0:00:10"))"

Hi guys,

Edit: code I am using is at bottom of post.

I have found that:

 Application.Wait (Now + TimeValue("0:00:10"))

Seems to not always last the same amount of time. Is "Now" from when I hit the commandbutton, or is it at this step starts?
How can i make "Now" time stamp from when "this step starts" because I want to display the message for a few seconds, however it seems to give me varying amounts of time.

Thanks,
Jimmy


The "Call DirectorysAndFileExistYorN.CheckFiles" function takes a very long time, a few minutes to run and i think that might be the problem with the "Now".

Private Sub CommandButton1_Click()
Application.ScreenUpdating = True
CommandButton1.Caption = "Loading, Please Wait."
Application.Wait (Now + TimeValue("0:00:01"))
Call DirectorysAndFileExistYorN.CheckFiles
CommandButton1.Caption = "Complete, Files in yellow are misplaced or misnamed."
Application.Wait (Now + TimeValue("0:00:10"))
CommandButton1.Caption = "Press to check if files exist."
End Sub