VBA kode der flytter data i en kolonne til bunden af en anden kolonne

Kan nogen hjælpe mig med en makro der kan udføre følgende:

Jeg har en tabel med 25 kolonner - de 3 øverste rækker er overskrifter og antallet af øvrige rækker er ca 350 men vil variere fra gang til gang.

kolonnerne er opbygget i sæt af 5 :

kode - kundenr - honorar - kontonr - periode

og der ligger således 5 sæt ved siden af hinanden. Nu har jeg brug for at få flyttet disse sæt ned under hinanden, gerne i et nyt friskt ark, så de i stedet ligger som en lang tabel stadig med de 3 overskrifter men nu kun  med 5 kolonner og ca 1750 rækker. Er der nogen der kan hjælpe mig med det.