Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

encadrement en fonction de la cellule

judoka0209

XLDnaute Occasionnel
Bonjour,
je voudrais savoir comment faire pour encadrer en rouge les cellules c6 à c11 si c14="ok"
merci
 

Pièces jointes

  • test.xlsx
    9.4 KB · Affichages: 17

Arnold

XLDnaute Nouveau
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
 
Dernière édition:

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…