If it's possible, how would you do it?
Thanks,
Aria :)
*** Sent via Developersdex http://www.developersdex.com ***
This may be rather simplistic but if you place this line of code after
each line you want slowed it will take 2 seconds between each action.
Application.Wait Now + (TimeValue("00:00:02"))
Change to suit.
Take Care
Marcus
Sub test()
Dim wksTemp As Worksheet
For Each wksTemp In Sheets
wksTemp.Activate
Call TimeOut(0, 0, 5)
Next wksTemp
End Sub
Sub TimeOut(lngHour As Long, _
lngMinute As Long, _
lngSecond As Long)
Dim dblWaitTime As Double
dblWaitTime = Now() + TimeSerial(lngHour, _
lngMinute, lngSecond)
Application.Wait dblWaitTime
End Sub
Thanks again,
OK, not really an Excel/VBA solution, but...
NickHK
<Aria> wrote in message news:u$rlwkZRH...@TK2MSFTNGP02.phx.gbl...