Macro to convert 4 columns of data into rows, then repeat

I currently have an excel that lists all the data in columns but I'd like to move it into rows. For Example I have the following

A01 = Amber
A02 = Female
A03 = 23
A04 = Houston
A05 = David
A06 = Male
A07 = 25
A08 = Miami
A09 = Jen
A10 = Female
A11 = 25
A12 = San Francisco


But I'd like for it to be


B | C | D | E
______________________________________
Amber | Female | 23 | Houston
David | Male | 25 | Miami
Jen | Female | 25 | San Francisco


I realize I can transpose but there are thousands I'd have to do. Is there an easy macro to do this?

I've seen other macros but they didn't work because I need specifically 4 columns to data to move into a row, then start next group of 4....
Any information is greatly appreciate.

Put this first formula in B1, then copy across through E1.

=INDEX($A:$A, (ROW(A1)*4)+COLUMN(A1)-4)

Now copy those four cells down until you start seeing zeros.

Copy the resulting table, then do a Paste Special > Values.

---------- Post added at 05:20 PM ---------- Previous post was at 05:15 PM ----------

...and for chuckles, a macro that does the same thing:

Please Login or Register  to view this content.

With the formulas, you would copy, then Paste Special > Values somewhere else.