VBA Sum based on matching values in multiple columns

Hi All,

I need to sum the values in column A per value in column D where in column B is Motorcycle A or Motorcycle B.

So like this (left input, right wanted result):

upload.png

There is an excel file attached.
note: the new data should not be copied to another sheet like in this example file

Hope someone is able to help me out


PS. I once asked a somewhat similar question but I had to change some things which resulted in different input, now i'm stuck again. This Post