Bonjour,

voilà, je voudrais faire une mise en page toute bête du type
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Range("G4:L5").Select
    With Selection.Interior
        .ColorIndex = 15
        .Pattern = xlSolid
    End With
mais en remplacant 4 et 5 par i et i+1
j'ai testé naturellement
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Range("G" & i ":L" & i + 1).Select
    With Selection.Interior
        .ColorIndex = 15
        .Pattern = xlSolid
    End With
mais là, Erreur de compilation Attendu : ou séparateur de liste ou )

Comment puis-je faire ça?

Merci a vous.