Macro recherche et faire la somme

Bonjour
je joins mon fichier et ce que je cherche à faire, c'est d'écrire une macro pour extraire par prénom et nom les lignes corresonpondantes et faire le total pour chaque personne.
je voudrais que la macro puisse me calculer le montant total de chaque personne sur ma liste automatiquement et renvoyer le résultat sur une autre feuille.
toute aide sera appréciée.
Merci