Sorry...I'm new to using macros and this website. For whatever reason when I
do a Vlookup on the item number field (A2) or the manuf. part number field
(D2) it doesn't recognize it until I go into the cell and press the enter
enter key....bizzare....I know. This spreadsheet is a result of an Access
query that is pulling data from a linked table in Lawson (our Supply
Chain/Procurement/HR/Finance system). The Vlookup is used to match the
manufacturer part number from our data (the excel spreadsheet pulled from
Access) to the manufacturer part number on a vendor/manufacturer's
spreadsheet to link the item with it's pricing. We then upload the pricing
back into Lawson with MS-Addins. Hope this helps explain things.

"Castell" wrote:

Why to you press ENTER? What does that achieve?


"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