That got all of column B but put did put the field for column B when column A
changed
col A Col C
door 1234, 5555,5555,6666,1234
hood

There should be the matching records for door and the matching records for
door

col A Col C
door 1234, 5555
hood 5555,6666,1234

Does that make sense?

"Jim Cone" wrote:

Debi,
Move the "StrToMatch = Cells(1 + NextRow, 1).Value" line down so it is
the first line in the Do loop...

Do While Cells(1 + NextRow, 1).Value < ""
StrToMatch = Cells(1 + NextRow, 1).Value
If Cells(1 + NextRow, 1).Value = StrToMatch Then
--
Jim Cone
San Francisco, USA
http://www.officeletter.com/blink/specialsort.html


"Debi H"
wrote in message
I have a list of parts in column A that I loop through and if they are the
same I get the data from colunm B that matches all the same values in column
A and insert it into C1.

colA ColB
door 1234
door 1234
door 5555
hood 5555
hood 6666
hood 1234

The output would be
col A Col C
door 1234, 5555
hood 5555,6666,1234


"Jim Cone" wrote:
Are you comparing Cell "A1" to the rest of the cells in column A or
are you looking for duplicates in column A ?
You could get a start on figuring out the problem by declaring all of your variables.
--
Jim Cone
San Francisco, USA
http://www.realezsites.com/bus/primitivesoftware