Similar to transpose values from vertical to horizontal

Hello forum experts,
I have three columns of data, ID, Type and Amount in vertical form. I need this to be in horizontal form with ID in single rows with Type as column headers and Amount as values below under correct column.

Attached is a file with data and a Result sheet with sample how it should look like.

Transpose does not work for this so I need a solution as this is regular exercise, very handy with a vba solution I think.

Thanks

Into B2:

Please Login or Register  to view this content.

and drag it down

Into C1:

Please Login or Register  to view this content.

and drag it right

Into C2:

Please Login or Register  to view this content.

and drag it down / right as needed.


Check attached file.