XL 2010 Faire fonctionner une macro que sur des plages de cellules sélectionnées.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim zone As Range
    Set zone = ActiveCell.CurrentRegion
    
    'Cells.FormatConditions.Delete
    Dim i As Integer
    For i = 1 To Cells.FormatConditions.Count
        If Cells.FormatConditions(i).Formula1 Like "*ligneActiveMFC*" Then
            Cells.FormatConditions(i).Delete
        End If
    Next
    With zone.FormatConditions.Add(xlExpression, Null, "=(""ligneActiveMFC""<>0)*LIGNE(" & zone.Cells(1).Address(False, False) & ")=" & ActiveCell.Row)
        .Font.ColorIndex = 2
        .Interior.ColorIndex = 3
    End With
    
End Sub