Hi I really need some help with this one - Please !

I have a table with 5 columns.
I want to use VB to look for a duplicate in column D, when one (or more) is found, add up the duplicates in column E and delete the unwanted rows. As in example

column D column E
Prod 1 2
Prod 2 3
Prod 3 56
Prod 3 44
Prod 3 10
Prod 1 33
Prod 1 67

What I would like it to show is

column D column E
Prod 1 2
Prod 2 3
Prod 3 110
Prod 1 100

Any suggestions ?