VBA Transpsoe data

Hi, I am new to VBA, and for my work I am suppose to clean my data to be in Power BI format.
As shown in the workbook, the raw data is above and the final cleaned(transposed) data is below. I want to create a macro so that the raw data can be transposed into the clean data. In raw data the date is odd, only shows the day of the month(can be seen in the workbook, so would need a macro to correct the date. Also in the clean data there is an added column for location, this data for location is fixed for this excel, i have other excel with the same format of raw data but they are for different location, so would need a macro to add the location column and key in the location name for that excel, so in power bi, can combine all excel files and their data can be differentiated by location even though they have same properties. This raw data cannot use direct transposing if you see the raw data I am handling and my desired clean data, that is why it requires VBA. The sample workbook attached is a simplified version of the actual one I'm working on, where there are more 50+ properties and dates reaching August 2020. So the VBA probably will require a loop. Would be so grateful to if anyone can create a macro to turn the raw data into the clean data. I tried doing myself but so far I haven't found an online video/tutorial on how to transpose data for my case.

Try

Please Login or Register  to view this content.

Hi thank you for the quick response, this VBA works for this raw data provided in the sample workbook, but the actual data I'm handling have 50+ properties(meaning 50+rows) and hundreds of columns(because there are even more dates, and ever month new data is uploaded). hence is there a configuration to this current VBA to have a loop?

No idea about what you have...

As in the sample workbook attached shows only 4 rows of data and 10 columns for dates for simplicity, but actual workbook(confidential) raw data that I am working on has 49 Different properties and like hundreds of dates.(starting from the date shown in the workbook)

I said already, no idea about what you have.

So no idea about the result that you want.