Need a macro that will disassemble a table and reformat it for upload

I am looking to create a macro that will take a database and disassemble it so I can upload it into our ERP system

Example: I have a chart that looks something like this...

Sales
Jan Feb Mar Apr May Jun
Tool 1 1 5 8 2 20 3
Tool 2 5 6 9 8 12 2
Tool 3 2 5 2 2 9 5
Tool 4 7 5 4 6 3 10

And I want the macro to turn it into this...

Jan Tool 1 1
Feb Tool 1 5
Mar Tool 1 8
Apr Tool 1 2
May Tool 1 20
Jun Tool 1 3
Jan Tool 2 5
Feb Tool 2 6
Mar Tool 2 9
Apr Tool 2 8
May Tool 2 12
Jun Tool 2 2
Jan Tool 3 2
Feb Tool 3 5
Mar Tool 3 2
Apr Tool 3 2
May Tool 3 9
Jun Tool 3 5
Jan Tool 4 7
Feb Tool 4 5
Mar Tool 4 4
Apr Tool 4 6
May Tool 4 3
Jun Tool 4 10

Any Thoughts?

Thanks!

Erick

Run ReportOut procedure.
Output in in the Immediate Windows

Where does the revised data go? I am not seeing anything when I run the macro...

The original output went to the Immediate Window.
This one output to "Sheet2"

Tony,

Very close...I just need the data in different columns.

ie: Date in Column A, item in Column B and quantity in Column C

Thanks!

Erick

Try this one then!

That is it exactly!

Thanks so much for your help.

Erick