Use Pause command or Wait command

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


sub dddd
your commands

pause

or

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

more commands

end sub


Re Your case problem if you have not declared you variables I sugges
you do declare them and have
Option Explicit
as the very first entry on you module sheet before trying to sort ou
your proble

--
Message posted from http://www.ExcelForum.com