XL 2016 Mise en forme Conditionnelle

Staple1600 à dit:

Bonsoir

Sans MFC mais avec du VBA
(dans le code de la feuille concernée)

VB:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 2 Then
Target.Offset(, -1).Font.Color = vbRed
End If
End Sub

Cliquez pour agrandir...

job75 à dit:

Pour ce qui est de la couleur en colonne A et des bordures on peut ajouter cette macro :

VB:

Private Sub Worksheet_Change(ByVal target As Range)
With [A1].CurrentRegion
    If .Rows.Count > 1 Then
        With .Offset(1).Resize(.Rows.Count - 1)
            .Columns(1).Interior.Color = RGB(231, 230, 230) 'gris clair
            .Borders.Weight = xlThin 'bordures
        End With
    End If
    '---RAZ en dessous---
    With .Offset(.Rows.Count).Resize(Rows.Count - .Rows.Count)
        .Interior.ColorIndex = xlNone
        .Borders.LineStyle = xlNone
    End With
End With
End Sub

Fichier (2).

Cliquez pour agrandir...