Hello,
Here's how...
For Each k In ks
MsgBox k.name
'Pause 10 seconds
Application.Wait(Now + TimeValue("0:00:10"))
Next k
Sincerely,
Leith Ross
--
Leith Ross
------------------------------------------------------------------------
Leith Ross's Profile:
http://www.excelforum.com/member.php...o&userid=18465
View this thread:
http://www.excelforum.com/showthread...hreadid=508818