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.M
Salut Camille,
Quelques imprécisions, y compris pour celle qui fonctionne. ;-)
Pour celle qui fonctionne: Range("a"&l + 1).FormulaR1C1 = _ ' le reste de la formule, parce que, justement, c'est une formule R1C1 (sous forme de string) que tu passes.
Pour celle qui ne fonctionne pas: C'est une formule de la feuille et les références doivent être inscrites comme tel.
toto = Evaluate("=SUMPRODUCT(1/(COUNTIF(H1:H" & l & ",H1:H" & _ l & "))*1)")
Salutations,
Daniel M.
"Ellimac" wrote in message news:13d201c38c00$a865fa50$ Bonjour,
Ceci fonctionne : Range("a" & l + 1) = _ "=SUMPRODUCT(1/(COUNTIF(R1C8:R" & l & "C8,R1C8:R" & l & "C8))*1)" toto = Range("a" & l + 1).Value
Mais pas ceci : toto=Evaluate("=SUMPRODUCT(1/(COUNTIF(R1C8:R" & l & "C8,R1C8:R" & l & "C8))*1)")
Est-il possible de récupérer le résultat de la fonction avec Evaluate ? Comment ?
Merci Camille
Salut Camille,
Quelques imprécisions, y compris pour celle qui fonctionne. ;-)
Pour celle qui fonctionne:
Range("a"&l + 1).FormulaR1C1 = _ ' le reste de la formule, parce
que, justement, c'est une formule R1C1 (sous forme de string) que tu passes.
Pour celle qui ne fonctionne pas:
C'est une formule de la feuille et les références doivent être inscrites comme
tel.
toto = Evaluate("=SUMPRODUCT(1/(COUNTIF(H1:H" & l & ",H1:H" & _
l & "))*1)")
Salutations,
Daniel M.
"Ellimac" <PasDePubellimacNiSpam_cremelier@hotmail.com> wrote in message
news:13d201c38c00$a865fa50$a101280a@phx.gbl...
Bonjour,
Ceci fonctionne :
Range("a" & l + 1) = _
"=SUMPRODUCT(1/(COUNTIF(R1C8:R" & l & "C8,R1C8:R" & l
& "C8))*1)"
toto = Range("a" & l + 1).Value
Mais pas ceci :
toto=Evaluate("=SUMPRODUCT(1/(COUNTIF(R1C8:R" & l
& "C8,R1C8:R" & l & "C8))*1)")
Est-il possible de récupérer le résultat de la fonction
avec Evaluate ? Comment ?
Quelques imprécisions, y compris pour celle qui fonctionne. ;-)
Pour celle qui fonctionne: Range("a"&l + 1).FormulaR1C1 = _ ' le reste de la formule, parce que, justement, c'est une formule R1C1 (sous forme de string) que tu passes.
Pour celle qui ne fonctionne pas: C'est une formule de la feuille et les références doivent être inscrites comme tel.
toto = Evaluate("=SUMPRODUCT(1/(COUNTIF(H1:H" & l & ",H1:H" & _ l & "))*1)")
Salutations,
Daniel M.
"Ellimac" wrote in message news:13d201c38c00$a865fa50$ Bonjour,
Ceci fonctionne : Range("a" & l + 1) = _ "=SUMPRODUCT(1/(COUNTIF(R1C8:R" & l & "C8,R1C8:R" & l & "C8))*1)" toto = Range("a" & l + 1).Value
Mais pas ceci : toto=Evaluate("=SUMPRODUCT(1/(COUNTIF(R1C8:R" & l & "C8,R1C8:R" & l & "C8))*1)")
Est-il possible de récupérer le résultat de la fonction avec Evaluate ? Comment ?
Merci Camille
Ellimac
Bonjour Daniel,
Super nickel, je te remercie pour ton Evaluate.
Camille
-----Message d'origine----- Salut Camille,
Quelques imprécisions, y compris pour celle qui fonctionne. ;-)
Pour celle qui fonctionne: Range("a"&l + 1).FormulaR1C1 = _ ' le reste de la formule, parce
que, justement, c'est une formule R1C1 (sous forme de string) que tu passes.
Pour celle qui ne fonctionne pas: C'est une formule de la feuille et les références doivent être inscrites comme
tel.
toto = Evaluate("=SUMPRODUCT(1/(COUNTIF(H1:H" & l & ",H1:H" & _
l & "))*1)")
Salutations,
Daniel M.
"Ellimac" wrote in message
news:13d201c38c00$a865fa50$ Bonjour,
Ceci fonctionne : Range("a" & l + 1) = _ "=SUMPRODUCT(1/(COUNTIF(R1C8:R" & l & "C8,R1C8:R" & l & "C8))*1)" toto = Range("a" & l + 1).Value
Mais pas ceci : toto=Evaluate("=SUMPRODUCT(1/(COUNTIF(R1C8:R" & l & "C8,R1C8:R" & l & "C8))*1)")
Est-il possible de récupérer le résultat de la fonction avec Evaluate ? Comment ?
Merci Camille
.
Bonjour Daniel,
Super nickel, je te remercie pour ton Evaluate.
Camille
-----Message d'origine-----
Salut Camille,
Quelques imprécisions, y compris pour celle qui
fonctionne. ;-)
Pour celle qui fonctionne:
Range("a"&l + 1).FormulaR1C1 = _ ' le reste de la
formule, parce
que, justement, c'est une formule R1C1 (sous forme de
string) que tu passes.
Pour celle qui ne fonctionne pas:
C'est une formule de la feuille et les références doivent
être inscrites comme
tel.
toto = Evaluate("=SUMPRODUCT(1/(COUNTIF(H1:H" & l
& ",H1:H" & _
l & "))*1)")
Salutations,
Daniel M.
"Ellimac" <PasDePubellimacNiSpam_cremelier@hotmail.com>
wrote in message