Fonction sumif dans vba
Résolu
Praljm
Messages postés
48
Date d'inscription
Statut
Membre
Dernière intervention
-
Praljm Messages postés 48 Date d'inscription Statut Membre Dernière intervention -
Praljm Messages postés 48 Date d'inscription Statut Membre Dernière intervention -
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
A+
Essaie avec
Sub essai_eau()
Cells(1, 10).Value = Application.WorksheetFunction.SumIf(Range("a2:a10"), "Eau", Range("b2:b10"))
End Sub
A+
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
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
