lægge tal sammen hvis teksten i kolonnen til venstre er ens

Jeg har et ark for jeg har 10-100 linjer stående
I kolonne A har jeg nogle forskellige tekster stående.
I kolonne C har jeg nogle forskellige tal stående ud for teksterne.

Kan det lade sig gøre at få en VBA kode til at tjekke om der er nogle tekster i kolonne A der er ens.
Og hvis de er det, så skal de tal der står i kolonne C lægges sammen. Samtidig skal koden så sørge for at teksten og dertilhørende tal ikke længere står tre flere gange, men kun en gang.

Mit ark ser feks. således ud:

A                  B            C
Fodbold      X            500
Håndbold    X            750
Badminton  X            450
Fodbold      X            950
Fodbold      X            300
Tennis          X            100

Når koden er kørt igennem skal arket gerne se således ud:

A                  B            C
Fodbold      X            1750
Håndbold    X            750
Badminton  X            450
Tennis          X            100