Bonjour

Je dois réaliser une macro qui va colorier une case en fonction de la valeur dans la case d'a coté

Si dans la colonne E j'ai un "1" je colorie la cellule d'as coter dans la colonne A

j'ai rédiger une macro qui le fait mais une case par une case pas tous en meme temps

est ce que je peux avoir un coup de main


Merci d'avance

voici mon bout de code

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Sub Colorier()
 
Sheets("Questionnaire1").Select
    If Cells(6, 5).Value = 1 Then
       Range("A6").Select
           With Selection.Interior
                .ColorIndex = 35
                .Pattern = xlSolid
           End With
    End If
 
End Sub