I use this function to insert delays in some of my code.

Public Function HalfSecDly()
s = Timer + 0.5
Do While Timer < s
DoEvents
Loop
End Function

You can set the time to different values in seconds by adjusting the number
in this line:

s = Timer + 0.5

In your example you would need two functions with different names and
different values, then simply call the function by name where you want the
delay.



"Sandy" wrote:

I would like to delay cell entries in a sub eg

Sub()

*****Code*****

Range("A1").Value = 10

*****Delay of 0.5 seconds*****

Range("B1".Value = 25

*****Delay of 0.5 seconds*****

Range("C1").Value = 60

*****Delay of 2 seconds*****

*****More Code*****
etc

End Sub

Can anyone explain best way to do this?
TIA
Sandy