Discussion :

[gyllou]

Bonsoir à tous,

J'aimerais savoir comment dans une macro pouvoir mettre dans une cellule cette formule avec les accolades(car cela attaque une liste de donnée):

Code :

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

1
2
 
{=((SUM(IF('A4'!$AH$5:$AH$1249="OK";'A4'!$D$10:$D$100;0)}

le syntaxe suivante ne fonctionne pas :

Code :

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

1
2
 
Cells(1, 1).FormulaLocal="{=((SUM(IF('A4'!$AH$5:$AH$1249=""OK"";'A4'!$D$10:$D$100;0)}"

Avez-vous des idées ?

Merci de votre aide.

[jfontaine]

si ton excel est en version francaise, ilf aut utiliser formula pour mettre des formule au format anglais

Code :

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

Cells(1, 1).Formula="{=((SUM(IF('A4'!$AH$5:$AH$1249=""OK"";'A4'!$D$10:$D$100;0)}"

De plus il semble y avoir un problème avec les parenthèse. tu en ouvres 4 et en ferme qu'une.

Le somme.si ne serait il pas en anglais sum.if au lieu de sum(if ?

[gyllou]

je voulais simplifier la commande macro :

Code :

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

Sheets("IMT").Cells(Lig + 0, Col + 0).FormulaLocal = "=SUM(IF('A4'!$AH$5:$AH$1249=""OK"";IF('A4'!$AH$5:$AH$1249=""NOK"";'A4'!$D$5:$D$1249;0);0))"

autant, cette formule

Code :

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

{=SUM(IF('A4'!$AH$5:$AH$1249=""OK"";IF('A4'!$AH$5:$AH$1249=""NOK"";'A4'!$D$5:$D$1249;0);0))}

fonctionne dans une cellule, mais je n'arrive pas à la mettre via une macro

[damsmut]

il faut que tu utilises FormulaArray pour les formules matricielles et enleve les accolades du début et de la fin
a+

[ouskel'n'or]

Si tu utilises FormulaLocal, ta formule doit être en français, ce qui devrait donner un truc comme ça si ta formule est exacte :

Code :

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

Sheets("IMT").Cells(Lig + 0, Col + 0).FormulaLocal = "=SOMME(SI('A4'!$AH$5:$AH$1249=""OK"";SI('A4'!$AH$5:$AH$1249=""NOK"";'A4'!$D$5:$D$1249;0);0))"

A+