J'intègre une fonction SumProduct dans un module VBA et je cherche à
variabiliser le nom d'un classeur et d'une feuille. Mais cela plante en
erreur 1004.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Daniel
Bonjour. Essaie :
ActiveCell = _ "=SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C4:R5000C4,LEN(RC1))=RC1)*(LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _ "'!R2C11:R5000C11)+SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C4:R5000C4,1+LEN(RC1))="" ""&RC1)*(LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _ "'!R2C11:R5000C11)"
Cordialement. Daniel "Ellimac" a écrit dans le message de news:
Bonjour,
J'intègre une fonction SumProduct dans un module VBA et je cherche à variabiliser le nom d'un classeur et d'une feuille. Mais cela plante en erreur 1004.
'essai ActiveCell = _ "=SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & "'!R2C4:R5000C4,LEN(RC1))=RC1)*(LEFT('[" & Nom & "]" & Nom2 & "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & "'!R2C11:R5000C11)+SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & "'!R2C4:R5000C4,1+LEN(RC1))="" ""&RC1)*(LEFT('[" & Nom & "]" & Nom2 & "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 '!R2C11:R5000C11)" Bien sûr c'est la 2nde qui ne fonctionne pas.
Si quelqu'un a une idée ou une autre solution que ce calcul ?
Merci
Camille
Bonjour.
Essaie :
ActiveCell = _
"=SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _
"'!R2C4:R5000C4,LEN(RC1))=RC1)*(LEFT('[" & Nom & "]" & Nom2 & _
"'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _
"'!R2C11:R5000C11)+SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _
"'!R2C4:R5000C4,1+LEN(RC1))="" ""&RC1)*(LEFT('[" & Nom & "]" & Nom2 & _
"'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _
"'!R2C11:R5000C11)"
Cordialement.
Daniel
"Ellimac" <Ellimac@discussions.microsoft.com> a écrit dans le message de
news: B2533B29-D2FC-416D-A42A-B73DB7798A78@microsoft.com...
Bonjour,
J'intègre une fonction SumProduct dans un module VBA et je cherche à
variabiliser le nom d'un classeur et d'une feuille. Mais cela plante en
erreur 1004.
ActiveCell = _ "=SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C4:R5000C4,LEN(RC1))=RC1)*(LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _ "'!R2C11:R5000C11)+SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C4:R5000C4,1+LEN(RC1))="" ""&RC1)*(LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _ "'!R2C11:R5000C11)"
Cordialement. Daniel "Ellimac" a écrit dans le message de news:
Bonjour,
J'intègre une fonction SumProduct dans un module VBA et je cherche à variabiliser le nom d'un classeur et d'une feuille. Mais cela plante en erreur 1004.
'essai ActiveCell = _ "=SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & "'!R2C4:R5000C4,LEN(RC1))=RC1)*(LEFT('[" & Nom & "]" & Nom2 & "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & "'!R2C11:R5000C11)+SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & "'!R2C4:R5000C4,1+LEN(RC1))="" ""&RC1)*(LEFT('[" & Nom & "]" & Nom2 & "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 '!R2C11:R5000C11)" Bien sûr c'est la 2nde qui ne fonctionne pas.
Si quelqu'un a une idée ou une autre solution que ce calcul ?
Merci
Camille
Ellimac
Bonjour Daniel,
J'ai trouvé mon erreur un oubli de & dans la fin de formule. Sinon il me semble qu'xl ne digère pas les renvois à la ligne dans une formule de calcul.
Camille
"Daniel" wrote:
Bonjour. Essaie :
ActiveCell = _ "=SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C4:R5000C4,LEN(RC1))=RC1)*(LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _ "'!R2C11:R5000C11)+SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C4:R5000C4,1+LEN(RC1))="" ""&RC1)*(LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _ "'!R2C11:R5000C11)"
Cordialement. Daniel "Ellimac" a écrit dans le message de news:
Bonjour,
J'intègre une fonction SumProduct dans un module VBA et je cherche à variabiliser le nom d'un classeur et d'une feuille. Mais cela plante en erreur 1004.
'essai ActiveCell = _ "=SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & "'!R2C4:R5000C4,LEN(RC1))=RC1)*(LEFT('[" & Nom & "]" & Nom2 & "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & "'!R2C11:R5000C11)+SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & "'!R2C4:R5000C4,1+LEN(RC1))="" ""&RC1)*(LEFT('[" & Nom & "]" & Nom2 & "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 '!R2C11:R5000C11)" Bien sûr c'est la 2nde qui ne fonctionne pas.
Si quelqu'un a une idée ou une autre solution que ce calcul ?
Merci
Camille
Bonjour Daniel,
J'ai trouvé mon erreur un oubli de & dans la fin de formule.
Sinon il me semble qu'xl ne digère pas les renvois à la ligne dans une
formule de calcul.
Camille
"Daniel" wrote:
Bonjour.
Essaie :
ActiveCell = _
"=SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _
"'!R2C4:R5000C4,LEN(RC1))=RC1)*(LEFT('[" & Nom & "]" & Nom2 & _
"'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _
"'!R2C11:R5000C11)+SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _
"'!R2C4:R5000C4,1+LEN(RC1))="" ""&RC1)*(LEFT('[" & Nom & "]" & Nom2 & _
"'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _
"'!R2C11:R5000C11)"
Cordialement.
Daniel
"Ellimac" <Ellimac@discussions.microsoft.com> a écrit dans le message de
news: B2533B29-D2FC-416D-A42A-B73DB7798A78@microsoft.com...
Bonjour,
J'intègre une fonction SumProduct dans un module VBA et je cherche à
variabiliser le nom d'un classeur et d'une feuille. Mais cela plante en
erreur 1004.
J'ai trouvé mon erreur un oubli de & dans la fin de formule. Sinon il me semble qu'xl ne digère pas les renvois à la ligne dans une formule de calcul.
Camille
"Daniel" wrote:
Bonjour. Essaie :
ActiveCell = _ "=SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C4:R5000C4,LEN(RC1))=RC1)*(LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _ "'!R2C11:R5000C11)+SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C4:R5000C4,1+LEN(RC1))="" ""&RC1)*(LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _ "'!R2C11:R5000C11)"
Cordialement. Daniel "Ellimac" a écrit dans le message de news:
Bonjour,
J'intègre une fonction SumProduct dans un module VBA et je cherche à variabiliser le nom d'un classeur et d'une feuille. Mais cela plante en erreur 1004.
'essai ActiveCell = _ "=SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & "'!R2C4:R5000C4,LEN(RC1))=RC1)*(LEFT('[" & Nom & "]" & Nom2 & "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & "'!R2C11:R5000C11)+SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & "'!R2C4:R5000C4,1+LEN(RC1))="" ""&RC1)*(LEFT('[" & Nom & "]" & Nom2 & "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 '!R2C11:R5000C11)" Bien sûr c'est la 2nde qui ne fonctionne pas.
Si quelqu'un a une idée ou une autre solution que ce calcul ?
Merci
Camille
Daniel
J'ai essayé avec la formule que je t'ai retourné. Il ne doit pas y avoir de problème tant que le renvoi n'est pas dans une zone entre guillemets. Daniel "Ellimac" a écrit dans le message de news:
Bonjour Daniel,
J'ai trouvé mon erreur un oubli de & dans la fin de formule. Sinon il me semble qu'xl ne digère pas les renvois à la ligne dans une formule de calcul.
Camille
"Daniel" wrote:
Bonjour. Essaie :
ActiveCell = _ "=SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C4:R5000C4,LEN(RC1))=RC1)*(LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _ "'!R2C11:R5000C11)+SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C4:R5000C4,1+LEN(RC1))="" ""&RC1)*(LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _ "'!R2C11:R5000C11)"
Cordialement. Daniel "Ellimac" a écrit dans le message de news:
Bonjour,
J'intègre une fonction SumProduct dans un module VBA et je cherche à variabiliser le nom d'un classeur et d'une feuille. Mais cela plante en erreur 1004.
'essai ActiveCell = _ "=SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & "'!R2C4:R5000C4,LEN(RC1))=RC1)*(LEFT('[" & Nom & "]" & Nom2 & "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & "'!R2C11:R5000C11)+SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & "'!R2C4:R5000C4,1+LEN(RC1))="" ""&RC1)*(LEFT('[" & Nom & "]" & Nom2 & "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 '!R2C11:R5000C11)" Bien sûr c'est la 2nde qui ne fonctionne pas.
Si quelqu'un a une idée ou une autre solution que ce calcul ?
Merci
Camille
J'ai essayé avec la formule que je t'ai retourné. Il ne doit pas y avoir de
problème tant que le renvoi n'est pas dans une zone entre guillemets.
Daniel
"Ellimac" <Ellimac@discussions.microsoft.com> a écrit dans le message de
news: A3BA1372-68DB-480F-8A62-70E4356E800E@microsoft.com...
Bonjour Daniel,
J'ai trouvé mon erreur un oubli de & dans la fin de formule.
Sinon il me semble qu'xl ne digère pas les renvois à la ligne dans une
formule de calcul.
Camille
"Daniel" wrote:
Bonjour.
Essaie :
ActiveCell = _
"=SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _
"'!R2C4:R5000C4,LEN(RC1))=RC1)*(LEFT('[" & Nom & "]" & Nom2 & _
"'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _
"'!R2C11:R5000C11)+SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _
"'!R2C4:R5000C4,1+LEN(RC1))="" ""&RC1)*(LEFT('[" & Nom & "]" & Nom2 & _
"'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _
"'!R2C11:R5000C11)"
Cordialement.
Daniel
"Ellimac" <Ellimac@discussions.microsoft.com> a écrit dans le message de
news: B2533B29-D2FC-416D-A42A-B73DB7798A78@microsoft.com...
Bonjour,
J'intègre une fonction SumProduct dans un module VBA et je cherche à
variabiliser le nom d'un classeur et d'une feuille. Mais cela plante en
erreur 1004.
J'ai essayé avec la formule que je t'ai retourné. Il ne doit pas y avoir de problème tant que le renvoi n'est pas dans une zone entre guillemets. Daniel "Ellimac" a écrit dans le message de news:
Bonjour Daniel,
J'ai trouvé mon erreur un oubli de & dans la fin de formule. Sinon il me semble qu'xl ne digère pas les renvois à la ligne dans une formule de calcul.
Camille
"Daniel" wrote:
Bonjour. Essaie :
ActiveCell = _ "=SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C4:R5000C4,LEN(RC1))=RC1)*(LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _ "'!R2C11:R5000C11)+SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C4:R5000C4,1+LEN(RC1))="" ""&RC1)*(LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _ "'!R2C11:R5000C11)"
Cordialement. Daniel "Ellimac" a écrit dans le message de news:
Bonjour,
J'intègre une fonction SumProduct dans un module VBA et je cherche à variabiliser le nom d'un classeur et d'une feuille. Mais cela plante en erreur 1004.
'essai ActiveCell = _ "=SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & "'!R2C4:R5000C4,LEN(RC1))=RC1)*(LEFT('[" & Nom & "]" & Nom2 & "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & "'!R2C11:R5000C11)+SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & "'!R2C4:R5000C4,1+LEN(RC1))="" ""&RC1)*(LEFT('[" & Nom & "]" & Nom2 & "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 '!R2C11:R5000C11)" Bien sûr c'est la 2nde qui ne fonctionne pas.
Si quelqu'un a une idée ou une autre solution que ce calcul ?
Merci
Camille
Daniel
Erratum. Lire : la formule que je t'ai retournée ;-)) Daniel "Daniel" a écrit dans le message de news: %
J'ai essayé avec la formule que je t'ai retourné. Il ne doit pas y avoir de problème tant que le renvoi n'est pas dans une zone entre guillemets. Daniel "Ellimac" a écrit dans le message de news:
Bonjour Daniel,
J'ai trouvé mon erreur un oubli de & dans la fin de formule. Sinon il me semble qu'xl ne digère pas les renvois à la ligne dans une formule de calcul.
Camille
"Daniel" wrote:
Bonjour. Essaie :
ActiveCell = _ "=SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C4:R5000C4,LEN(RC1))=RC1)*(LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _ "'!R2C11:R5000C11)+SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C4:R5000C4,1+LEN(RC1))="" ""&RC1)*(LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _ "'!R2C11:R5000C11)"
Cordialement. Daniel "Ellimac" a écrit dans le message de news:
Bonjour,
J'intègre une fonction SumProduct dans un module VBA et je cherche à variabiliser le nom d'un classeur et d'une feuille. Mais cela plante en erreur 1004.
'essai ActiveCell = _ "=SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & "'!R2C4:R5000C4,LEN(RC1))=RC1)*(LEFT('[" & Nom & "]" & Nom2 & "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & "'!R2C11:R5000C11)+SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & "'!R2C4:R5000C4,1+LEN(RC1))="" ""&RC1)*(LEFT('[" & Nom & "]" & Nom2 & "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 '!R2C11:R5000C11)" Bien sûr c'est la 2nde qui ne fonctionne pas.
Si quelqu'un a une idée ou une autre solution que ce calcul ?
Merci
Camille
Erratum.
Lire : la formule que je t'ai retournée
;-))
Daniel
"Daniel" <dZZZcolardelle@free.fr> a écrit dans le message de news:
%23Jwsa2TnHHA.5068@TK2MSFTNGP05.phx.gbl...
J'ai essayé avec la formule que je t'ai retourné. Il ne doit pas y avoir
de problème tant que le renvoi n'est pas dans une zone entre guillemets.
Daniel
"Ellimac" <Ellimac@discussions.microsoft.com> a écrit dans le message de
news: A3BA1372-68DB-480F-8A62-70E4356E800E@microsoft.com...
Bonjour Daniel,
J'ai trouvé mon erreur un oubli de & dans la fin de formule.
Sinon il me semble qu'xl ne digère pas les renvois à la ligne dans une
formule de calcul.
Camille
"Daniel" wrote:
Bonjour.
Essaie :
ActiveCell = _
"=SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _
"'!R2C4:R5000C4,LEN(RC1))=RC1)*(LEFT('[" & Nom & "]" & Nom2 & _
"'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _
"'!R2C11:R5000C11)+SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _
"'!R2C4:R5000C4,1+LEN(RC1))="" ""&RC1)*(LEFT('[" & Nom & "]" & Nom2 & _
"'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _
"'!R2C11:R5000C11)"
Cordialement.
Daniel
"Ellimac" <Ellimac@discussions.microsoft.com> a écrit dans le message de
news: B2533B29-D2FC-416D-A42A-B73DB7798A78@microsoft.com...
Bonjour,
J'intègre une fonction SumProduct dans un module VBA et je cherche à
variabiliser le nom d'un classeur et d'une feuille. Mais cela plante
en
erreur 1004.
Erratum. Lire : la formule que je t'ai retournée ;-)) Daniel "Daniel" a écrit dans le message de news: %
J'ai essayé avec la formule que je t'ai retourné. Il ne doit pas y avoir de problème tant que le renvoi n'est pas dans une zone entre guillemets. Daniel "Ellimac" a écrit dans le message de news:
Bonjour Daniel,
J'ai trouvé mon erreur un oubli de & dans la fin de formule. Sinon il me semble qu'xl ne digère pas les renvois à la ligne dans une formule de calcul.
Camille
"Daniel" wrote:
Bonjour. Essaie :
ActiveCell = _ "=SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C4:R5000C4,LEN(RC1))=RC1)*(LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _ "'!R2C11:R5000C11)+SUMPRODUCT((LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C4:R5000C4,1+LEN(RC1))="" ""&RC1)*(LEFT('[" & Nom & "]" & Nom2 & _ "'!R2C7:R5000C7,LEN(R4C[-1]))=R4C[-1])*'[" & Nom & "]" & Nom2 & _ "'!R2C11:R5000C11)"
Cordialement. Daniel "Ellimac" a écrit dans le message de news:
Bonjour,
J'intègre une fonction SumProduct dans un module VBA et je cherche à variabiliser le nom d'un classeur et d'une feuille. Mais cela plante en erreur 1004.