Fonction sumif avec une variable

Bonjour,
Je reprends le fichier que j'avais déjà traité, et je rajoute une variable (eau, maintenance, nettoyage...).
'Cells(40, 1).Value = Application.WorksheetFunction.SumIf(Range("p2:p10000"), "variable", Range("r2:r10000"))

Je ne sais plus comment intégrer et définir la variable qui sera en fait une liste excel (eau, maintenance, nettoyage...).

Compte de charge Montant Ventilé TTC
Maintenance 309.75 €
Eau 22.95 €
Eau 11.38 €
Eau 275.77 €
Eau 237.68 €
Eau 51.40 €
Eau 24.10 €
Eau 36.58 €
Eau 36.49 €
Eau 42.75 €
Eau 34.98 €
Eau -33.98 €
Eau -27.55 €
Eau 55.75 €
Eau 68.51 €
Maintenance 373.56 €
Nettoyage -300.00 €
Eau -63.57 €
Eau -61.35 €



Merci d'avance
Bonne journée