Autoclose form doesn't always close when it should?

I have tried to create a popup form that will auto close after a specified number of seconds and also allow early closure by Escape key or by user clicking the form.

Below is my code - poor as it is. I don't understand why but sometimes this code gets stuck in the For...Next loop even when the mblnExitMe value is True. There must be a basic fundamental that I am not getting but I'm not sure what it could be.

Please Login or Register  to view this content.

I don't know the reason it gets stuck, but I would suggest a better alternative to a For-Next loop and Sleeping is to establish an Application.OnTime event. I think that would be more bulletproof. Maybe something like this...

Please Login or Register  to view this content.

Put this in a standard code module. Change the name of the UserForm to suit.

Please Login or Register  to view this content.

Interesting suggestion AlphaFrog. Could you help me understand why an Application.OnTime is better than using Sleep in a For Next?

BTW I think I found out some of the problems with my original code (yeah it's a mess. I cannabalised code from a Progress Bar form which will explain a few things!), I had some Click events that unload the Form. They should be using mblnExitMe = True

When you use Sleep in VBA, all of Excel is paused while sleeping; It doesn't output, process, or receive input.

Application.Ontime doesn't pause Excel. It just schedules a macro to be run at some future time.

Originally Posted by AlphaFrog

When you use Sleep in VBA, all of Excel is paused while sleeping; It doesn't output, process, or receive input.

Application.Ontime doesn't pause Excel. It just schedules a macro to be run at some future time.

Thanks for the explanation AlphaFrog. (reps)

I have shied away from Application.Ontime in case it tries to fire after I have finished with the function. I will try to rethink my approach in future.