VBA how to add values from one column in reference to other column of having same value

Question

so it woud go from this to this

i am a newbie at vba and i need this for my internship been stuck for two days and i know my code why it isnt working but i can fix it i t