Discussion :

[Marine32]

Bonjour,

Je suis completement débutante dans vba, et dans le cadre de mon travail j'ai le problème suivant à résoudre : j'ai un fichier excel avec macro vba existant qui fonctionne partiellement. Une des fonctions permettait de mesurer l'écart entre la prévision et les ventes, et lorsque l'écart était > à 20% la case % se mettait en couleur. La couleur ne s'affiche plus lorsque je fais tourner la macro. et ce depuis le passage de excel 2003 à 2010.
la partie suivante apparait en débogage :

Code :

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

1
2
Selection.FormulaArray = _
            "=SUM(IF(RC[-9]:RC[-5]<obj1,1,0)*IF(RC[-9]:RC[-5]>-obj1,1,0))"

Cela parait à priori simple mais je n'arrive pas à résoudre le problème. Pouvez vous m'aider? Merci d'avance...

[Invité]

Bonjour Marine32

"FormulaArray" n'existe plus dans Excel 2010

Peut-être comme ça

Code :

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

Selection.Value = Application.Evaluate("SUM(IF(RC[-9]:RC[-5]<obj1,1,0)*IF(RC[-9]:RC[-5]>-obj1,1,0))")

A tester

[mercatog]

Bonsoir

"FormulaArray" n'existe plus dans Excel 2010

Source?

Sinon Obj1 est elle une variable? Si affirmatif

Code :

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

Rnage(.FormulaArray = "=SUM(IF(RC[-9]:RC[-5]<" & Obj1 & ",1,0)*IF(RC[-9]:RC[-5]>" & -1 * Obj1 & ",1,0))"