Discussion :

[totoche]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
.Row = 0
    For k = 0 To 2 Step 2
                For i = 1 To .Cols - 1
               .Col = i
               .CellBackColor = RGB(255, 161, 224)
               Next i
    .Row = k
    Next

Pourquoi ci dessus ça ne marche pas (les entêtes 2 ème bande ne sont pas coloriés)
alors que ci-dessous ça marche

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
   .Row = 0
     For i = 1 To .Cols - 1
     .Col = i
     .CellBackColor = RGB(255, 161, 224)
    Next i
 
   .Row = 2
     For i = 1 To .Cols - 1
     .Col = i
     .CellBackColor = RGB(255, 161, 224)
    Next i

[Delbeke]

peut etre ceci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
   For k = 0 To 2 Step 2
      .Row = k
           For i = 1 To .Cols - 1
               .Col = i
               .CellBackColor = RGB(255, 161, 224)
          Next i
    Next

[OhMonBato]

peut etre parce que dans le premier code quand k passe à 2, tu fais ta sauce et ce n''est qu'ensuite que Row passe à 2
plus rapie que moi Delbeke

[totoche]

Bien vue
merci messieurs