Transpose a single column to a single row with duplicates removed

[ggilzow]

I am new to VBA coding and am trying to write a VBA code to transpose a single column to a single row with duplicates removed. This length of the list can vary.

In column B contains
1
1
2
3
4
3

I would like to transpose starting at "F1" and the row would look like this
F1 G1 H1
1 2 3

What VBA code can accomplish this?

[antoka05]

If you have your data in 'A' column (data has to start from second row) you could use this macro:

Please Login or Register  to view this content.

Regards,
Antonio

[antoka05]

May be you need to delete previous data that are in f1,g1, etc.:

Please Login or Register  to view this content.

Regards,
Antonio

[ggilzow]

Works good. Only 1 slight problem for some reason it is not copying A1 cell. If the column A has values as such
1
2
1
3
4

It will transpose to 2 3 4 and leaves out 1.

[Obsessed]

Try, Assuming column B:

Please Login or Register  to view this content.

[ggilzow]

Thank you Obsessed this will work.

Thank you Antonio for your help.

G²

[AB33]

Another one

Please Login or Register  to view this content.