Corriger une macro

Le 12/09/2013 à 09:03

Bonjour j'ai mis en place une formule sous excel, le probleme c'est quand j'enregistre la macro et je l'essaie juste aprés ça ne fonctionne pas; je pensais que ma formule etait longue et donc je l'ai enregistré partie par partie mais ça ne marche toujoujours pas.

la formule qui fonctionne bien:

=SIERREUR((SOMMEPROD((Feuil1!CF$2:CF$60000="P")*(Feuil1!CL$2:CL$60000="N")*(Feuil1!CI$2:CI$60000)*(Feuil1!G$2:G$60000>=A_Debut)*(Feuil1!G$2:G$60000<=A_Fin))+ (SOMMEPROD((Feuil1!CF$2:CF$60000="P")*(Feuil1!CL$2:CL$60000="Y")*(Feuil1!FN$2:FN$60000)*(Feuil1!G$2:G$60000>=A_Debut)*(Feuil1!G$2:G$60000<=A_Fin))-SOMMEPROD((Feuil1!CF$2:CF$60000="P")*(Feuil1!CL$2:CL$60000="Y")* (Feuil1!CM$2:CM$60000) *(Feuil1!G$2:G$60000>=A_Debut)*(Feuil1!G$2:G$60000<=A_Fin)))+ (SOMMEPROD(( Feuil1!CF$2:CF$60000="P")*(Feuil1!CL$2:CL$60000="")*(Feuil1!FN$2:FN$60000)*(Feuil1!G$2:G$60000>=A_Debut)*(Feuil1!G$2:G$60000<=A_Fin))-SOMMEPROD((Feuil1!CF$2:CF$60000="P") *(Feuil1!CL$2:CL$60000="")*(Feuil1!CM$2:CM$60000)*(Feuil1!G$2:G$60000>=A_Debut)*(Feuil1!G$2:G$60000<=A_Fin))))/ (SOMMEPROD((Feuil1!CF$2:CF$60000="P")*(Feuil1!CL$2:CL$60000="N")*(Feuil1!G$2:G$60000>=A_Debut)*(Feuil1!G$2:G$60000<=A_Fin))+SOMMEPROD((Feuil1!CF$2:CF$60000="P")*(Feuil1!CL$2:CL$60000="Y")*(Feuil1!G$2:G$60000>=A_Debut)*(Feuil1!G$2:G$60000<=A_Fin))+ SOMMEPROD((Feuil1!CF$2:CF$60000="P")*(Feuil1!CL$2:CL$60000="")*(Feuil1!G$2:G$60000>=A_Debut)*(Feuil1!G$2:G$60000<=A_Fin)));0)

la macro :

Range("K5").Select

ActiveCell.FormulaR1C1 = _

"=IFERROR((SUMPRODUCT((Feuil1!R2C[73]:R60000C[73]=""P"")*(Feuil1!R2C[79]:R60000C[79]=""N"")*(Feuil1!R2C[76]:R60000C[76])*(Feuil1!R2C[-4]:R60000C[-4]>=A_Debut)*(Feuil1!R2C[-4]:R60000C[-4]<=A_Fin))+ (SUMPRODUCT((Feuil1!R2C[73]:R60000C[73]=""P"")*(Feuil1!R2C[79]:R60000C[79]=""Y"")*(Feuil1!R2C[159]:R60000C[159])*(Feuil1!R2C[-4]:R60000C[-4]>=A_Debut)*( Feuil1!R2C[-4]:R60000C[-4] <=A_ Fin)) " & _

"-SUMPRODUCT((Feuil1!R2C[73]:R60000C[73]=""P"")*(Feuil1!R2C[79]:R60000C[79]=""Y"")* (Feuil1!R2C[80]:R60000C[80]) *(Feuil1!R2C[-4]:R60000C[-4]>=A_Debut)*(Feuil1!R2C[-4]:R60000C[-4]<=A_Fin)))+ (SUMPRODUCT(( Feuil1!R2C[73]:R60000C[73]=""P"")*(Feuil1!R2C[79]:R60000C[79]="""")*(Feuil1!R2C[159]:R60000C[159])*(Feuil1!R2C[-4]:R60000C[-4]>=A_Debut)*( Feuil1!R2C[-4]:R60000C[-4] <=A_ Fin)) " & _

"-SUMPRODUCT((Feuil1!R2C[73]:R60000C[73]=""P"") *(Feuil1!R2C[79]:R60000C[79]="""")*(Feuil1!R2C[80]:R60000C[80])*(Feuil1!R2C[-4]:R60000C[-4]>=A_Debut)*(Feuil1!R2C[-4]:R60000C[-4]<=A_Fin))))/ (SUMPRODUCT((Feuil1!R2C[73]:R60000C[73]=""P"")*(Feuil1!R2C[79]:R60000C[79]=""N"")*(Feuil1!R2C[-4]:R60000C[-4]>=A_Debut)*(Feuil1!R2C[-4]:R60000C[-4]<=A_Fin))+SUMPRODUCT((Feuil1!R2C[73]:R60000C[73]=""P"")" & _

" *(Feuil1!R2C[79]:R60000C[79]=""Y"")*(Feuil1!R2C[-4]:R60000C[-4]>=A_Debut)*(Feuil1!R2C[-4]:R60000C[-4]<=A_Fin))+ SUMPRODUCT((Feuil1!R2C[73]:R60000C[73]=""P"")*(Feuil1!R2C[79]:R60000C[79]="""")*(Feuil1!R2C[-4]:R60000C[-4]>=A_Debut)*(Feuil1!R2C[-4]:R60000C[-4]<=A_Fin))),0)"

Si vous pouvez m'aider à trouver l'erreur, je vous serai reconnaissante. Merci

Le 12/09/2013 à 10:22

Bonjour,

Un petit fichier

Cdlt

Rechercher des sujets similaires à "corriger macro"