Discussion :

[jackall]

bonjour à tous,

voila j'ai un petit problème avec l'enregistreur de macro, j'ai une formule qui est :
=SOMME((REJECT!d4:d1000000<TEMP!d11)*(REJECT!c4:c1000000<30)*(REJECT!b4:b1000000=1))+SOMME((REJECT!d4:d1000000<TEMP!d11)*(REJECT!c4:c1000000>50)*(REJECT!b4:b1000000=1))+SOMME((REJECT!d4:d1000000>TEMP!d11)*(REJECT!b4:b1000000=1))>TEMP!d19)*(REJECT!m4:m1000000<TEMP!h19)*(REJECT!l4:l1000000>50)*(REJECT!j4:j1000000>TEMP!d17)*(REJECT!j4:j1000000<TEMP!h17)*(REJECT!i4:i1000000>3.5)*(REJECT!i4:i1000000<18.5)*(REJECT!h4:h1000000<TEMP!d15)*(REJECT!g4:g1000000>135)*(REJECT!g4:g1000000<170)*(REJECT!f4:f1000000<TEMP!d13)*(REJECT!e4:e1000000>100)*(REJECT!e4:e1000000<140)*(REJECT!d4:d1000000<TEMP!d11)*(REJECT!c4:c1000000>30)*(REJECT!c4:c1000000<50)*(REJECT!b4:b1000000=1)))

donc ma manipulation est la suivante, j'active l'enregistreur de macro, je tape ma formule, je la fini par ctrl+shift+enter. la tout ce passe bien il me trouve le bon résultat. ensuite j'arrete l'enregistreur. je place un contrôle activeX sur ma feuille excel et je lui assigne la macro avec la ligne de code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

call Module3.macro3

et la il me donne une fenêtre de deboggage ...
j'ai fais un test, j'ai découper la formule, c'est à dire que j'ai fait une macro qu'avec :
=SOMME((REJECT!d4:d1000000<TEMP!d11)*(REJECT!c4:Cc1000000<30)*(REJECT!b4:b1000000=1))
et sa marche trés bien, et lorsque je rajoute :
=SOMME((REJECT!d4:d1000000<TEMP!d11)*(REJECT!c4:c1000000<30)*(REJECT!b4:b1000000=1))+SOMME((REJECT!d4:d1000000<TEMP!d11)*(REJECT!c4:c1000000>50)*(REJECT!b4:b1000000=1))
cela ne marche plus ...

est ce que l'on pourrai m'aider ...

[mayekeul]

bonjour,

et c'est quoi l'erreur renvoyée?
sur quelle partie du code,....

sans cela, ça va etre duraille!

[jackall]

il me dit :
Erreur d'éxécution '1004':
Impossible de définir la propriété FormulaArray de la classe Range

et je ne comprend pas trop ...

[mayekeul]

un petit bout de code ne serait pas superflu!

:o)

[jackall]

oups dsl ... ^^

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Sub Macro11()
'
' Macro11 Macro
'
 
'
    Selection.FormulaArray = _
        "=(SUM((REJECT!R[-121]C:R[999875]C<STAT_REJECT!RC[-2])*(REJECT!R[-121]C[-1]:R[999875]C[-1]<30)*(REJECT!R[-121]C[-2]:R[999875]C[-2]=1))+SUM((REJECT!R[-121]C:R[999875]C<STAT_REJECT!RC[-2])*(REJECT!R[-121]C[-1]:R[999875]C[-1]>50)*(REJECT!R[-121]C[-2]:R[999875]C[-2]=1))+SUM((REJECT!R[-121]C:R[999875]C>STAT_REJECT!RC[-2])*(REJECT!R[-121]C[-2]:R[999875]C[-2]=1)))"
End Sub

voila voila ^^

[golliat]

Pourquoi ne pas décomposer ta formule dans plusieurs cellules
et ensuite relier le tout avec un sum qui ajoute les résultats de chaque partie ?