Bonjour,
je voudrais savoir comment faire pour encadrer en rouge les cellules c6 à c11 si c14="ok"
merci
Bonjour,
En utilisant une macro évènementielle tu peux arriver au résultat.
A adapter selon ton besoin.
Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$C$14" Then
If Cells(14, 3) = "ok" Then
Range(Cells(6, 3), Cells(11, 3)).Select
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = 255
.TintAndShade = 0
.PatternTintAndShade = 0
End With
End If
If Cells(14, 3) <> "ok" Then
Range(Cells(6, 3), Cells(11, 3)).Select
With Selection.Interior
.Pattern = xlNone
.TintAndShade = 0
.PatternTintAndShade = 0
End With
End If
End If
End Sub