SendKeys with enter

T

thread

hi all
i'm trying to use SendKeys to simulate rutine action.
i'm doing the actions on web based system but from some reason after
using the enter in the sendkeys the rest of the actions are not
working
this is the code
Dim i, J As Long
Range("A1").Select
While Selection.Font.ColorIndex = 4
Selection.Offset(1, 0).Select
Wend
Selection.Font.ColorIndex = 4
i = Selection.Cells
SendKeys "%{TAB}", True
SendKeys "{DEL}", True
SendKeys i, True
SendKeys "{ENTER}", True
SendKeys "{TAB}", True
SendKeys "{TAB}", True
SendKeys "{TAB}", True
SendKeys "{TAB}", True
SendKeys "{TAB}", True

thank you for any advice
 
G

Gary''s Student

Try inserting a DoEvents command immediately after the

SendKeys "{ENTER}", True
 
Top