formule en VBA

[baptbapt]

Bonjour

Est-il possible de modifier une tel formule, pour la mettre en VBA

=SOMMEPROD(($C$5:$C$1147>I5)*($C$5:$C$1147<=J5)*($E$5:$E$1147="Entry"))

et aussi pour des calculs de se type, dois-je faire des macros ou des fonctions

=M5+K6
Function Nb(M As Range)
Nb = Range("M" & M.Row).Offset(-1, 0).Value + Range("K" & M.Row).Value
End Function
C'est se que j'ai mis en VBA, mais sa me met toujours la valeur 0

 

[porcinet82]

Re : formule en VBA

re baptbapt,

Pour une addition toute simple, je ne vois pas l'intéret d'utiliser une fonction, un simple range("M5").value+range("k6").value fait l'affaire.

Par contre comme la deja di Yeahou, je ne n'arrive pas à comprendre comment ta fontion peut fonctionner si tu ne définis pas ton M (on ne sais pas ce que représente M ici, non?):
Function Nb(M As Range)
Nb = Range("M" & M.Row).Offset(-1, 0).Value + Range("K" & M.Row).Value
End Function

Moi je mettrais plutot quelque chose du genre :
Function Nb(M)
Set M = ActiveCell
Nb = Range("M" & M.Row).Offset(-1, 0).Value + Range("K" & M.Row).Value
End Function

Si quelqu'un passe par là et peut m'expliquer, je suis preneur.
Par contre pour ce qui est de ta formule, je ne sais pas à quoi sert un SOMMEPROD, alors ca va être difficile de t'aider.

@+

 

[MichelXld]

Re : formule en VBA

bonsoir Baptbapt , bonsoir cher Porcinet

tu peux tester la methode Evaluate pour utiliser ta fonction SOMMEPROD en VBA

MsgBox _
Evaluate("=SUMPRODUCT(($C$5:$C$1147>I5)*($C$5:$C$1147<=J5)*($E$5:$E$1147=""Entry""))")

bonne soiree
MichelXld

 

[baptbapt]

Re : formule en VBA

Ok merci

mais je doit taper sa comment

dans une macro
ou bien dans thisworkbook

et je tape quoi après dans ma ligne d'équation excel

Sub ....
MsgBox_Evaluate("=SUMPRODUCT(($C$5:$C$1147>I5)*($C$5:$C$1147<=J5)*($E$5:$E$1147=""Entry ""))")
end sub

et aussi, pour lié l'utilisation de toute mes fonction je peurt les appelée tous dans une meme macro?
ou je les appellent dans thisworkbook?
ou bien je les appelle pas du tout et je garde les fonction independante?

dommage que je ne puisse pas mettre ma page excel en pièce jointe.

Merci