Discussion :

[tchoutchou69]

Bonjour à tous,

J'aimerai griser certaines cellules suivant certains criteres.
Par exemple, si sur la feuille "IndAn", j'ai le mot Trimestriel dans la colonne F et la ligne 9, je grise les cellules M9,N9,P9,Q9,S9,T9,V9 et W9.
Et ainsi de suite pour le mot annuelle, semetrielle.....et pour toute les lignes.

Je vous joins mon debut de code faux

Code :

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

1
2
3
4
5
6
Private Sub Worksheet_SelectionChange
For I = 180 To 8 Step -1
If .Cells(I, 7) = "Trim*" Then
For J = 20 To 8 Step -3 then .Cells(i,j).ColorIndex=16
 
End Sub

Merci d'avance.