VBA_ Formule conditionelle qui prenne en compte les couleurs

Bonjour à tous ,

Je viens vers vous car je bute sur une macro et peut être que vous aurez une idée pour m'aider.
Mon problème (que je pensais simple) est le suivant : je souhaiterais que la cellule de ma colonne ("A2:A") se colore en Jaune si une cellule de la même ligne de la plage ("B2:BV") est colorée en jaune.

Vous trouverez ci joint le fichier , avec la macro (trés nulle) que j'ai écrite et qui ne fonctionne pas. :(

Merci de m'avoir lue et pour votre aide !

Bonne soirée !

A.

Bonsoir Anais83

Vouloir utiliser une macro pour colorier la colonne A en fonction d'autres cellules... c'est aller au devant d'une belle usine à gaz

Je me poserais la question, pourquoi certaines cellules doivent être en jaune ?

Et éventuellement faire une MFC avec le critère

A+

Bonjour à tous,

A tester....

Sub c_Verification_Couleur()
 Dim dl&, dc&, I&
   Application.ScreenUpdating = False
     With Sheets("Sheet1")
      dl = .UsedRange.Rows.Count
      dc = .UsedRange.Columns.Count
      .Range("A2:A" & dl).Interior.color = xlNone
       For I = 2 To dl
        For j = 2 To dc
         If .Cells(I, j).Interior.color = RGB(255, 255, 0) Then
         .Cells(I, 1).Interior.color = RGB(255, 255, 0): Exit For
         End If
        Next j
       Next I
     End With
   Application.ScreenUpdating = True
End Sub

Cordialement,

Bonjour Anais83, BrunoM45, Xorsankukai,

Avec une fonction personnalisée placée en dernière colonne du tableau.

Tout changement de couleur (jaune ou non) dans le tableau se répercutera sur la MFC inscrite en colonne A

Bonjour à tous !

X Cellus, merci pour ton aide je n'avais pas pensé à la fonction personnalisée je prends note :)

Xorsankukai , merci pour ta macro elle fonctionne parfaitement :)

Bonne journée à vous !

A

A nouveau,

Nouvelle version, automatisée. Voir notes en rouge.