Somme si en VBA

[@lex]

Bonjour a tous,

Voila j'aurais aimé savoir comment faire un somme si en vba .
Car je voudrais retranscrire cette formule excel :
=SI(SI(E23=E22;0;SOMME.SI($E$24:$E$5099;E23;$I$24:$I$5099))>$F$15;SOMME.SI($E$24:$E$5099;E23;$I$24:$I$5099);0)
en vba.


Merci d'avance

 

[Spitnolan08]

Re : Somme si en VBA

Bonjour,

Si j'ai bien interprété car, à priori, ta formule est fausse, une solution :

Sub Test()
Dim A As Double
A = WorksheetFunction.SumIf(Range("E24:E50599"), Range("E23"), Range("I24:I5099"))
If Range("E23") <> Range("E22") And A > Range("F15") Then
    Range("A1") = A
Else
    Range("A1") = 0
End If
End Sub

Cordialement