ERREUR d'execution 9 l'indice n'appartient pas à la selection

[tipexo]

Bonjour,

Voilà ça fait 2 jours que je suis bloqué face à une erreur en VBA sous excel que je vois pas. Je cherche à déterminer une valeur de lambda qui est juste le nom de la valeur à partir de donné dans mon tableau excel. Le i est le numero de ligne. J'ai l'erreur 9 sur le premier lambda1(i) le i est mis a 3 donc normalement c bon mais je pige pas. J'ai appliquer le mm genre de relation sans de "do while until" qui fonctionne tous correctement je sais pas où est le problème. Merci d'avance



Dim lambda1() As Single
Dim lambda2() As Single

'détermination du lambda
For i = 3 To 7

lambda1(i) = 0.025

Do

lambda2(i) = (Abs(2 * (Log((Cells(i, 1) / (3.7 * Cells(i, 4) / 1000)) + (2.52 / (Cells(i, 8) * (lambda1(i) ^ 0.5)))) / Log(10#)))) ^ -2
lambda1(i) = lambda2(i)

Loop Until Abs(lambda1(i) - lambda2(i)) < 10 ^ -8

Next i


For i = 3 To 7
Cells(i, 8) = lambda2(i)
Next i

 

[kjin]

Re : ERREUR d'execution 9 l'indice n'appartient pas à la selection

Bonsoir,
Tes tableaux ne sont pas dimensionnés
A+
kjin

 

[Hippolite]

Re : ERREUR d'execution 9 l'indice n'appartient pas à la selection

Bonjour,
Et si tu dimensionnais tes tableaux
Utiliser les variables tableaux en VBA Excel
A+

Pas rafraichi, bonsoir kjin

 

[tipexo]

Re : ERREUR d'execution 9 l'indice n'appartient pas à la selection

Hop la merci les gars vous m'avez bien aidez la dessus un grand merci bonne soirée a vous