Need assistance to automatically reformat an existing spreadsheet to a new format by Macro

I am somewhat new to VBA let alone Excel 2010 and need some assistance in changing an existing format of a spreadsheet to a different format. I want to have a button or something they one can press to perform the task. I have a current report that is somewhat pivotted and I need to make it a linear one. I am attaching a spreadsheet with a sample. So my data allows multiple time points to be entered onto one line to make it easier to read. I need that to be transposed so that time is in one column going down the spreadsheet and not across. The rest of the data can be duplicated for each line. I want the macro to be flexible so that it will run if there are 3 sample or 100. I should scan down and continue until the end of the file. Can anyone help or give me a starting point on how to get this done.

Thanks you in advance for any assistance.
Isara