Bonsoir!
Pourquoi, dans le code ci dessous, lorsque j'execute la macro, M VB Editor me réponds "Erreur : Next sans For"!!?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
For i = 2 To Sheets("Options").Range("B4").Value + 1
    If Sheets("Affich").Cells(i, 2).Value = Absent Then
    Sheets(NomSheet).Cells(i, Nocolonn).Value = 1
    Else: Sheets(NomSheet).Cells(i, Nocolonn).Value = 0
Next i