Mise en forme conditionnelle en VBA

Bonjour à tous,

J'essaie de faire une mise en forme conditionnelle en VBA pour éviter des problèmes lors de suppression de ligne dans mon fichier.

Je souhaiterais que lorsque un "V" apparais dans la colonne "O" que la ligne "Ax:Ox" soit Verte

Dans un tableau complet A5:O1000

Surement extrêmement facile pour vous, si quelqu'un à une idée je suis preneur

Ps : je suis un novice en VBA

A bientôt

Ajunata

Hello,

Pas tout compris.

Si un V est dans la cellule O999 alors la ligne A999 à O999 soit en vert ?

R@g

Oui c'est ça

tu veux en temps réel c'est à dire que dès que tu indiques un V alors la ligne devient verte ou tu veux appuyer sur un bouton et ça va aller vérifier toutes les lignes s'il y a un V ?

C'est pour le suivi de production,

c'est à dire que l'orque ma production sera en cours de validation qualité, je souhaiterais l'indiquer d'un V dans la colonne O de la ligne correspondant à la production

Donc oui plutôt en temps réel si c'est possible

Alors en temps réel attention au copier coller ça ne marche pas, il faut bien saisir le V à la mano.

A mettre ce code dans un evenement worksheet_change :

Option Compare Text
Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Column = 15 Then
      If Target.Count = 1 Then
            If Target.Value = "V" Then
                  Range("A" & Target.Row & ":O" & Target.Row).Interior.ColorIndex = 4
            ElseIf Target.Value <> "V" Then
                 Range("A" & Target.Row & ":O" & Target.Row).Interior.ColorIndex = xlColorIndexNone
            End If
      End If
End If

End Sub

r@G

Merci bcp pour votre code,

C'est parfait pour mon application

Ajunata