Macro to Transpose 5 Rows of Data to a New Sheet as per sample

Dear All,

I am using Excel 2013 and I have an issue as shown in the sample file attached.

I have a Main sheet (sample shows only data for 2 Staff).
Data starts in Cell A1 till Column J1
Headers are in Row 1

I need a Macro which should

1) Create a new Output Sheet.

2) Copy the Headings A1 to G1 from Main Sheet to the Output sheet and the remaining details of Description from Column H in transposed format viz Basic, Housing Allowance, Transport Allowance, Other Allowance, Social Allowance to the Output Sheet.

3) Each Staff Output will be on one row on the Output sheet.

4) The macro should calculate the Total for each Row under Column M on the Output sheet.

Please refer to the sample for further explanation. I have colored the cells for explanation purposes only.

Thanks in advance for any help

With pivot table.

See the attached file.