Colorier ligne
RésoluBonjour
Voilà dans ma feuille de calcul j'ai cette macro pour mettre en couleur la ligne enfonction de la cellule que je sélectionne.
Mais, cette macro fonctionne pour toute la feuille. Et j'aimerai qu'elle fonctionne que pour les cellules de A2 à AW32. est possible. Merci pour votre aide.
Ci dessous ma macro.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Rows.Interior.ColorIndex = xlNone
Target.EntireRow.Interior.ColorIndex = 36
End Sub
Bon dimanche
mchotard
2 réponses
-
Bonjour,
Une solution:
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Application.Intersect(Target, Range("A2:AW32")) Is Nothing Then Rows.Interior.ColorIndex = xlNone Range("A" & Target.Row & ":AW" & Target.Row).Interior.ColorIndex = 36 End If End Sub
-
Merci Le Pingou
Cela fonctionne parfaitement, c'est ce que souhaitait pour mettre d'autre ligne de ma feuille dans d'autres couleurs.
Très cordialment
