How about something like this,
Private Sub Worksheet_Change(ByVal Target As Range)
'will move to A10 after you enter data in A1 and hit enter
If Intersect(Target, Range("A1")) Is Nothing Then Exit Sub
[A10].Select
End Sub
To put in this macro right click on the worksheet tab and view code, in the
window that opens paste this code, press Alt and Q to close this window and
go back to your workbook. If you are using excel 2000 or newer you may have
to change the macro security settings to get the macro to run.
--
Paul B
Always backup your data before trying something new
Using Excel 2000 & 97
Please post any response to the newsgroups so others can benefit from it
** remove news from my email address to reply by email **
