I'm afraid that is still not enough detail (at least for me it isn't). What
are you trying to accomplish in the end? You say you want to go to the end
of the first item in Row 2... does that mean you want to enter Edit mode and
have the text cursor located at after the "3" in the number "108913"? Then
you say you want to press the Enter key. Why? What is doing that supposed to
accomplish (besides moving the active cell down one row)? You have described
actions you want to perform, but not told us what is supposed to happen as a
result. For example, are you wanting to delete the entry, copy it to another
location, something else? The thing you need to do when posing a question on
a newsgroup is re-read what you have written and ask yourself, "If the
person who reads this know absolutely NOTHING about what I am trying to do,
can he/she figure it out from what I have written?" The reason you have to
do this is because no one here will know anything about what you are trying
to do unless you tell them. Don't assume we can piece it together or figure
it out... tell us... in detail.

Rick


"Jeanne A" wrote in message
...
Here's a sample of the spreadsheet.

ITEM NBR MFG CODE MFG DIV MFG NBR
108913 STRY STMD 0026-261-000
108914 STRY STMD 0715-001-265
108915 STRY STMD 0715-001-266
108916 STRY STMD 1010-700-035
108917 STRY STMD 1010-700-055
108918 STRY STMD 1010-700-075

I need to go to the end of the first item number in row 2, press the enter
key, and repeat for all remaining item numbers in that column on the
spreadsheet. The number of rows in the column will change each time I run
the query in Access and import into Excel.

I hope this helps! Thanks.

"Rick Rothstein (MVP - VB)" wrote:

Your write up is somewhat confusing to me. You say "move to the end of
the
cell", but I am not sure what you mean by that. You also say "and move to
the next cell in that **row**" (emphasis on the word "row" is mine);
however, your code shows no movement from column to column within the
same
row, only movement from row to row. And where did the numbers come from?
Are
there more of them? Perhaps if you try describing what you want to do in
more detail, it might help?

Rick


"Jeanne A" wrote in message
...
I'm trying to write a macro to select a cell, move to the end of the
cell,
press enter, and move to the next cell in that row & then repeat for
all
rows
in that column. Here's what I have so far.

Range("A2").Select
ActiveCell.FormulaR1C1 = "07-30365"
Range("A3").Select
ActiveCell.FormulaR1C1 = "07-40281"
Range("A4").Select
ActiveCell.FormulaR1C1 = "1272-00-02"
Range("A5").Select
ActiveCell.FormulaR1C1 = "1272-00-03"
Range("A6").Select
ActiveCell.FormulaR1C1 = "1272-00-04"
Range("A7").Select
ActiveCell.FormulaR1C1 = "1272-00-05"
Range("A8").Select
End Sub