VBA: copy and paste in horizontal

[Nelson78]

Hello everybody.

I'm struggling with a database in which some data (in the example, names of cities) could be repeated a lot of times.

I need to report in another sheet the data, and then report in horizontal the related datas.

See what I mean in the image https://imgur.com/a/HMMWHae


I have succeed in copy and paste the first column without duplicates. Now I need some hints to complete the job, atleast in what sort of approach is needed.

Thank's.

 

[Nelson78]

In what way?

The source sheet has the following formats:
COLUMN A: general
COLUMN B: date
COLUMN C: general

At the end of the operation, all the data moved in the receiving sheet have format "general" (so, what was "date" in column B of the source, become "general").
If possible, in the receiving sheet I need general what was general, and date what was date.

 

[Fluff]

Try adding this line to the end of the code

Range("D:D,F:F,H:H").NumberFormat = "dd/mm/yyyy"

 

[Nelson78]

Try adding this line to the end of the code

Range("D:D,F:F,H:H").NumberFormat = "dd/mm/yyyy"

I'm getting to test it.

 

[Nelson78]

I'm getting to test it.

Well, it works perfectly.