vba addition de colonne dans excell

[eden3]

Bonjour , j'essaye de faire un code et je ne comprend pas pourquoi il me met des erreurs
j'ai plusieurs triangle qui se suivent sur mon tableau excel et je veux aditionne chaque colonne du triangle a partir de la colonne 4 , j'ai ecrits le code mais on me dit que j'ai un next sans for or j'ai mis deux boucle for et deux next
svp help me!!!
[cpp]
Sub jesaispas()
For K = 4 To 15
For i = 1 To 15
If Not IsEmpty(Range("Ki")) Then
Next
Else
Do Until j = i + 1
Range("Kj") = Range("Kj") + Range("Kj+1")
Loop
Next
End Sub
[/cpp]


merci d'avance pour vos reponses

 

[chonos]

test avec un "Next i" et "Next j"

For i=truc Else chose Next i

For j=Machin Else bidul Next i

a+

 

[zeb]

Plop,

!
On n'est plus en 1985. Plus de variable derrière les Next. Au contraire, on utilise l'indentation.

@eden3. "Ki", ""Kj+1" ?
Si je dis que n = 2, tu t'appelles toujours "eden3", ou tu te mets à t'appeler "ede23" ?
Ce qui est entre guillemets est invariant.

Tu programmes en python ?
Si oui, alors apprends que le VB attend des mots-clefs pour fermer les ensembles d'instructions.
L'indentation ne suffit pas. Même si elle est TRES recommandée.

Sub -> End Sub
For -> Next
Do -> Loop
If -> End If

Indente correctement ton code.

Tes instructions doivent être imbriquées les unes dans les autres, comme des poupées russes.
Le Next de ton For i est dans une clause If..End If (dont tu as oublié le End If)
Le If .. EndIf doit être tout entier dans le For .. Next.