Macro to Transpose data in rows to columns

Hi,

is it possible to develop a macro which transpose rows into column, i have attached a sample excel, QC Sheet has the raw data which i will get from QC and i wanted to convert into Tableau Sheet format. the Macro should be flexible to handle increase/decrease in columns/rows.

Any help would really appreciated


Thanks,
Uday Kumar