Fonction sumif dans vba
Résolu
Bonjour,
Je souhaite adapter la fonction sommeprod d'excel en utilisant sumif de vba, mais excel 2002 semble ne pas connaitre la formule...pour totaliser les montants par compte de charge
Compte de charge Montant Ventilé TTC
Combustibles 3 711.60 €
Electricité 405.38 €
Electricité 68.81 €
Maintenance 50.82 €
Eau 82.12 €
Eau 134.82 €
Combustibles 2 206.02 €
Electricité 367.14 €
Electricité 71.96 €
Sub essai_eau()
Cells(1, 10).Value = Application.WorksheetFunction.SumIf(Range("a2:a10"), "Eau", ("b2:b10"))
End Sub
Ce tableau comportera 10 000 lignes de factures à traiter en automatique par nature compte charge, en rajoutant le mois et le n° de fournisseur...
Merci de votre aide !
Cordialement.
Je souhaite adapter la fonction sommeprod d'excel en utilisant sumif de vba, mais excel 2002 semble ne pas connaitre la formule...pour totaliser les montants par compte de charge
Compte de charge Montant Ventilé TTC
Combustibles 3 711.60 €
Electricité 405.38 €
Electricité 68.81 €
Maintenance 50.82 €
Eau 82.12 €
Eau 134.82 €
Combustibles 2 206.02 €
Electricité 367.14 €
Electricité 71.96 €
Sub essai_eau()
Cells(1, 10).Value = Application.WorksheetFunction.SumIf(Range("a2:a10"), "Eau", ("b2:b10"))
End Sub
Ce tableau comportera 10 000 lignes de factures à traiter en automatique par nature compte charge, en rajoutant le mois et le n° de fournisseur...
Merci de votre aide !
Cordialement.
3 réponses
-
Bonjour,
Essaie avec
Sub essai_eau()
Cells(1, 10).Value = Application.WorksheetFunction.SumIf(Range("a2:a10"), "Eau", Range("b2:b10"))
End Sub
A+ -
Merci !
Ca fonctionne
Cdt -
Bonjour,
Je reprends le même fichier, et je rajoute une variable (eau, edf, gaz, fuel...).
'Cells(40, 1).Value = Application.WorksheetFunction.SumIf(Range("d2:d10000"), "variable", Range("s2:s10000"))
Je ne sais plus comment intégrer et définir la variable qui sera en fait une liste excel.
Merci d'avance
Bonne journée
