Transpose Data Using Macro

Hi,


I am at a loss for how to do this. I attached a example of the data I'm trying to transpose. I have the current data on the left and pasted the result I'm going for on the right.

Thanks,

Jim