erreur de compilation : ???

[1ma9]

Bonjour a tous,

je vous expose mon probleme.

je me suis lancé dans vba il y a quelques jours, et aujourd'hui j'ai un soucis qui parait tout bete.

Mon code est le suivant :

Sub calculs()

For i = 145 To 150
For j = 2 To 5
For k = 2 To 5
Sheets("Feuil3").Cells(j, i).Value = Sheets("Feuil3").Cells(j, i - 44).Value * Sheets("Feuil3").Cells(2, k).Value * Sheets("Feuil3").Cells(2, k).Value

Next i, j, k

End Sub

et quand je démarre il y a inscrit erreur de compilation: Référence de controle incorrecte dans Next ...

Je me suis trompé ... mais je ne le vois pas... ! quelqu'un saurait ?

merci

 

[Efgé]

Re : erreur de compilation : ???

Bonjour 1ma9,
Essayez ceci :

Sub calculs()
For i = 145 To 150
    For j = 2 To 5
        For K = 2 To 5
            Sheets("Feuil3").Cells(j, i).Value = Sheets("Feuil3").Cells(j, i - 44).Value * Sheets("Feuil3").Cells(2, K).Value * Sheets("Feuil3").Cells(2, K).Value
        Next K
    Next j
Next i
End Sub

Il faut mettre les next dans l'ordre.
Cordialement

 

[1ma9]

Re : erreur de compilation : ???

merci a toi !!