Ligne/col change de couleur quand une cellule est active

Hello

quand je selectionne sur une cellule, je voudrais que toute la ligne et colonne passe dans une autre couleur. comment puis-je faire ? merci

Bonjour

Essai cela

Private Sub Worksheet_SelectionChange(ByVal Target _
 As Excel.Range)
    Cells.Interior.ColorIndex = xlNone
    With ActiveCell
        .EntireRow.Interior.ColorIndex = 35
        .EntireColumn.Interior.ColorIndex = 35
    End With
End Sub