Next sans for

Bonjour,

j'ai eu beau chercher je ne trouve pas pourquoi j'ai un message d'erreur " Erreur de compilation : Next sans for"

Mon code est ci-dessous, je souhaite simplement masquer les mêmes lignes dans 2 onglets différents en fonction des cellules vides ou non du premier onglet..

Merci par avance pour votre aide

Sub MasqueLignes3()
Dim i As Integer
Application.ScreenUpdating = False

    For i = 11 To 30

    If Sheets("Coûts").Range("C" & i) = "" Then
    Sheets("Coûts").Rows(i).Hidden = True
    Sheets("Vente").Rows(i).Hidden = True
    Next i

    For i = 36 To 55
    If Sheets("Coûts").Range("C" & i) = "" Then
    Sheets("Coûts").Rows(i).Hidden = True
    Sheets("Vente").Rows(i).Hidden = True
    Next i

End Sub

Bonjour,

Il manque les 2 End If avant les lignes Next i

Merci beaucoup, ça fonctionne.

bonne soirée