VB code to filter copy and paste in a different sheet

HI,

This is my list
Item Location
059-01-0032 THE RELATION THE RELATIONSHIP BIBLE 1164
059-01-0032 THE RELATION THE RELATIONSHIP BIBLE 1285
059-01-0032 THE RELATION THE RELATIONSHIP BIBLE 1306
059-01-0032 THE RELATION THE RELATIONSHIP BIBLE 1329
059-01-0032 THE RELATION THE RELATIONSHIP BIBLE 1379
059-01-0032 THE RELATION THE RELATIONSHIP BIBLE 1488
.
.
.
.
.
.
.
so on

I have say 20 items in the next worksheet in a transpose format under each item the locations need to be pasted vertically using VB
059-01-0032 059-02- 0035 059-05-2459 ....................

1164 2589 6546
1285 1650 8496
1306 5989 8744
1329 1654 6546
1379 4654 1465
1488 6546 1654

Help me on this

like this sorry
059-01-0032 059-02- 0035 059-05-2459 ....................

1164 2589 6546
1285 1650 8496
1306 5989 8744
1329 1654 6546
1379 4654 1465
1488 6546 1654

Help me on this

Filtering requires knowing the heading of a data. Please attach your sample so that we can see and test the code.

Heading is item and location

Each item has N number of location

Say 10 items are put in the second worksheet in horizontal format

The locations for each item need to be pasted under the item vertically