NEED HELP WITH SEEMINGLY IMPOSSIBLE REQUEST

[NICKATWORK]

I have a spreadsheet with part numbers in column A and Description for the part number in Column B

The problem I'm faced with is each part number has a different code that needs to be attached to the end of it to show color, and the color that code represents added to the beginning of the description in column B...

-25 for Grey
-03 for Almond
-49 for Burgandy
-36 for Blue Frost
-53 for Pine Forest
-11 for Black

So, esentially abc123 would become abc123-25 and grey added to the front of the description then abc123-03and almond added to the descrition, abc123-49 ect. ect.... moving on to the next part number after all codes and colors have been added to that part number.

Now the only way I can fathom doing this is to use a counter that loops four times on a single part number in row A, concatenating part number with the dash and code, and adding the color to the beginning of the description in Column B and pasting the result into sheet 2, before moving to the next part number.

Is this even possible or have I lost my mind??
If it is possible can someone please help me accomplish this?

 

[NICKATWORK]

For i = 1 To DataRange.Rows.Count
NewPartNo = DataRange.Cells(i, 1).Value & "-25"
Set NewPartNo = NewPartNffset(1)
NewDesc = "Grey " & DataRange.Cells(i, 2).Value
Set NewDesc = NewDesc.Offset(1)
Set PriceRange = DataRange.Cells(i, 3).Value
Set PriceRange = PriceRange.Offset(1)

After the first part number runs through grey and it's pasted to the new sheet it stops right here on the highlighted line

 

[Barrie Davidson]

Sorry, change that line to read:

PriceRange = DataRange.Cells(i, 3).Value

Does that work?

 

[NICKATWORK]

WORKS PERFECT!!!!!


Mr. Davidson You are a lifesaver!!!!!

Thank You!!!!