Next sans for Le sujet est résolu

Y compris Power BI, Power Query et toute autre question en lien avec Excel
Répondre
Avatar du membre
crikou13
Jeune membre
Jeune membre
Messages : 35
Inscrit le : 16 février 2015
Version d'Excel : 2010

Message par crikou13 » 15 octobre 2015, 17:01

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
Avatar du membre
Raja
Passionné d'Excel
Passionné d'Excel
Messages : 5'190
Appréciations reçues : 14
Inscrit le : 3 février 2008
Version d'Excel : 2010 à 2016 FR et 2010 EN

Message par Raja » 15 octobre 2015, 17:14

Bonjour,
Il manque les 2 End If avant les lignes Next i
Cdlt,
Raja
Avatar du membre
crikou13
Jeune membre
Jeune membre
Messages : 35
Inscrit le : 16 février 2015
Version d'Excel : 2010

Message par crikou13 » 15 octobre 2015, 17:19

Merci beaucoup, ça fonctionne.

bonne soirée :D
Répondre