[rachel52]

Bonjour,

Voici le code à placer dans ThisWorkbook, il surligne la ligne et la colonne de la cellule sélectionnée.

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Rows.Interior.ColorIndex = xlColorIndexNone
Target.EntireColumn.Interior.ColorIndex = 36
Target.EntireRow.Interior.ColorIndex = 36
End Sub

Je fais souvent le tour de différents forums, mais j'ai oublié la source de celui-ci. Merci à l'auteur et désolée de ne pas pouvoir le citer.

Diane