Concaténation entre "evaluate" et des ranges
Bonjour à tous,
J'ai exploré les concaténations avec la méthode "evaluate" .
Malgré tout, mon problème persiste. Je pense que cela vient du fait que je ne sais pas ce que retourne un type "range".
Voici mon bout de code :
Code:
1
2
3
4
5
6
7
8
9
10
11
| i = 1
Do While Tableau5(i, weeks_tot - 2) <> 0
Worksheets("Evolution graphs").Range("Q53").Offset(i - 1, 0) = Tableau5(i, weeks_tot - 2)
Set Range_test = Worksheets("Evolution graphs").Range("Q53", Worksheets("Evolution graphs").Range("Q53").Offset(i - 1, 0))
i = i + 1
Loop
'Ici se situe le problème => Erreur 13 / Incompatibilité de type
Tb = Evaluate("=LOGEST(""" & Range_test & """)")
'ou
Tb = Evaluate("=LOGEST(" & Range_test & ")") |
Je voudrais évaluer =LOGEST(Q53:Q67). Mais Range_test évolue.
A savoir : en tapant Tb = Evaluate("=LOGEST(Q53:Q67)"), le programme fonctionne.
Cela doit donc venir du fait que Range_test ne retourne pas Q53:Q67...
Avez vous des suggestions ?
Merci par avance pour vos réponses !
Kimy
