Adapter une macro au besoin

Bonjour

J'ai cette macro qui fonctionne bien quand on sélectionne une cellule quelconque dans un tableau.

J'aimerais si cela est possible la faire fonctionner si une cellule change de couleur (exemple vert) dans ce tableau

Est ce possible?

merci pour votre aide

Sub LireCellules()
Dim rng As Range

For Each rng In Selection
rng.Activate
Application.Speech.Speak ActiveCell
Next rng

End Sub

Bonjour à tous!

Joco7915, comme ceci peut-être le choix de la couleur de fond égal à la cellule E1

Sub LireCellules()
Dim rng As Range
For Each rng In Range("A1:A10")
If rng.Interior.ColorIndex = Cells(1, 5).Interior.ColorIndex Then
rng.Activate
Application.Speech.Speak ActiveCell
End If
Next rng
End Sub

Bonne journée!

Rechercher des sujets similaires à "adapter macro besoin"