Traduction formule en VBA Le sujet est résolu

Y compris Power BI, Power Query et toute autre question en lien avec Excel
Répondre
S
Simon_Lbb
Membre fidèle
Membre fidèle
Messages : 151
Inscrit le : 13 juin 2019
Version d'Excel : 2013

Message par Simon_Lbb » 3 juillet 2019, 11:50

Bonjour tout le monde,

Savez-vous comment traduire :

=SOMME.SI.ENS($H$61:$H$111;$D$61:$D$111; "=2019";$F$61:$F$111;"=" & C5)

En VBA ?

J'ai essayé :
Cells(10, 4) = Application.WorksheetFunction.SumIfs(Range("H61:H11"), Range("D61:D111"), "=2019",Range("F61:F111"), "=" & Range("C5")

Mais ça ne fonctionne pas. J'ai l'impression que c'est le Range(("F61:F111"), "=" & Range("C5")) qui ne marche pas.


Merci d'avance,

Simon
Avatar du membre
i20100
Passionné d'Excel
Passionné d'Excel
Messages : 6'030
Appréciations reçues : 351
Inscrit le : 16 mars 2017
Version d'Excel : 2010

Message par i20100 » 3 juillet 2019, 12:21

Bonjour Simon,

à tester,
r = Evaluate("SUMIFS(H61:H111,D61:D111, ""="" & 2019,F61:F111,""="" & C5)")
Prenons soins de nous et de notre vaisseau spatial, nous n’en n’avons qu’un ...notre planète terre
isabelle
S
Simon_Lbb
Membre fidèle
Membre fidèle
Messages : 151
Inscrit le : 13 juin 2019
Version d'Excel : 2013

Message par Simon_Lbb » 3 juillet 2019, 12:58

Bonjour i 20100,

Merci beaucoup pour ta proposition.
Ca fonctionne mais j'aimerais tirer ma formule vers le bas et que C5 deviennent C6, C7 etc.

Tu sais comment faire cela ?
Avatar du membre
i20100
Passionné d'Excel
Passionné d'Excel
Messages : 6'030
Appréciations reçues : 351
Inscrit le : 16 mars 2017
Version d'Excel : 2010

Message par i20100 » 3 juillet 2019, 13:13

re,

à tester,
Cells(10, 4).Formula = "=SUMIFS($H$61:$H$111,$D$61:$D$111," & """=2019""" & ",$F$61:$F$111,C5)"
Prenons soins de nous et de notre vaisseau spatial, nous n’en n’avons qu’un ...notre planète terre
isabelle
S
Simon_Lbb
Membre fidèle
Membre fidèle
Messages : 151
Inscrit le : 13 juin 2019
Version d'Excel : 2013

Message par Simon_Lbb » 3 juillet 2019, 13:24

Re,

Non ça ne dépend toujours pas de la case C5...

Aurais-tu une autre solution s'il te plait ?

Merci beaucoup pour ton aide,

Simon
Avatar du membre
i20100
Passionné d'Excel
Passionné d'Excel
Messages : 6'030
Appréciations reçues : 351
Inscrit le : 16 mars 2017
Version d'Excel : 2010

Message par i20100 » 3 juillet 2019, 13:32

Simon_Lbb a écrit :
3 juillet 2019, 13:24
Re,
Non ça ne dépend toujours pas de la case C5...
en cellule D10 j'obtiens la formule
=SOMME.SI.ENS($H$61:$H$111;$D$61:$D$111;"=2019";$F$61:$F$111;C5)
si je tire vers le bas, j'obtiens
=SOMME.SI.ENS($H$61:$H$111;$D$61:$D$111;"=2019";$F$61:$F$111;C6)
je ne vois pas ou est le problème ?
Prenons soins de nous et de notre vaisseau spatial, nous n’en n’avons qu’un ...notre planète terre
isabelle
S
Simon_Lbb
Membre fidèle
Membre fidèle
Messages : 151
Inscrit le : 13 juin 2019
Version d'Excel : 2013

Message par Simon_Lbb » 3 juillet 2019, 13:34

Re,

Okok donc le seul moyen est de tirer la formule vers le bas ?

J'aurais aimé que dans mon code, la cellule s'adapte à la ligne.

Merci,

Simon
Avatar du membre
i20100
Passionné d'Excel
Passionné d'Excel
Messages : 6'030
Appréciations reçues : 351
Inscrit le : 16 mars 2017
Version d'Excel : 2010

Message par i20100 » 3 juillet 2019, 13:51

re,

non tu peux faire comme ca,
Range("D10:D100").Formula = "=SUMIFS($H$61:$H$111,$D$61:$D$111," & """=2019""" & ",$F$61:$F$111,C5)"
Prenons soins de nous et de notre vaisseau spatial, nous n’en n’avons qu’un ...notre planète terre
isabelle
S
Simon_Lbb
Membre fidèle
Membre fidèle
Messages : 151
Inscrit le : 13 juin 2019
Version d'Excel : 2013

Message par Simon_Lbb » 4 juillet 2019, 10:14

Bonjour,

Super c'est parfait merci beaucoup pour ton aide :)

Simon
Répondre
  • Sujets similaires
    Réponses
    Vues
    Dernier message