zone de liste et coloration de Cellules

[paul87]

Bonjour,
dans une feuille .xls,
j'ai dans une colonne, des listes deroulantes avec un choix de deux critères.
je souhaiterais que selon le choix réalisé, cela colore en vert ou en rouge les 14 cellules à droite de la liste..
est-ce possible...si oui comment
Merci par avance

 

[Cousinhub]

Re : zone de liste et coloration de Cellules

Re-,
peut-être :

Private Sub CommandButton1_Click()
Dim i As Byte
activecell.Resize(1, 15).Interior.ColorIndex = 3
For i = 5 To 15 Step 5
    activecell.Offset(0, i).Value = "Test"
Next i
End Sub