Sendkeys and wait variant

[accountingboy]

I'm running a macro with a sendkeys statement, followed by a past
command. However, I can't seem to get the wait variant to work? Th
paste is running before the sendkeys, and for the life of me I can'
figure this one out. Here's a snipit:
You can see where I've tried to run the wait seperate, but it run
BEFORE the sendkeys also.

Application.CutCopyMode = False
Selection.Cut
Range("D5").Select
Application.SendKeys "{END}{DOWN}{DOWN}", True

'Application.Wait (Now + TimeValue("0:00:02"))
Application.Run "PASTE"

Call me stupid, but I'm stuck

 

[Tom Ogilvy]

Sub Tester2()
Selection.Cut Destination:=Range("D5").End(xldown)(2)
End Sub