How to transfer data from horizonal to vertical

[fvisions]

How can I create a vba to copy the data from col c to columns F:AC for multiple days with cell e1 to be Oct 1st ed to be Oct 2 and so on for a full month?
Example of the data set is below: columns A:C is the month of October for 24 hours

10/01/2020​	12:00:00​	0.211​		10/01/2020​	0.211​	0.25​	0.35​
10/01/2020​	1:00:00​	0.25​		10/02/2020​
10/01/2020​	2:00:00​	0.35​

 

[alansidman]

Using Power Query, Pivoted the data

Book7
	A	B	C	D	E	F	G	H
1	Date	Time	Value
2	10/01/2020	12:00:00	0.211		10/01/2020	0.211	0.25	0.35
3	10/01/2020	1:00:00	0.25		10/02/2020
4	10/01/2020	2:00:00	0.35
5
6					Date	12:00:00	1:00:00	2:00:00
7					10/01/2020	0.211	0.25	0.35
Sheet1

let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Pivoted Column" = Table.Pivot(Source, List.Distinct(Source[#"Time "]), "Time ", "Value")
in
    #"Pivoted Column"

 

[Trixterz]

Or you can copy and use the the paste special called transpose.