Couleur d'une forme en fonction de la valeur d'une cellule

Bonjour à tous,

Je souhaite modifier la couleur d'une forme en fonction d'une condition.

Exemple : un disque se colore en rouge si la cellule A1 < 100 et qui se colore en vert si la cellule A1>= 100.

Je n'ai aucune connaissance en macro.

J'ai pu trouver un code sur internet qui réaliserait une fonction analogue:

"

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Range("B3").Value = 0 Then

ActiveSheet.Shapes(1).Fill.ForeColor.SchemeColor = 11

ElseIf Range("B3").Value = 5 Then

ActiveSheet.Shapes(1).Fill.ForeColor.SchemeColor = 10

End If

End Sub

"

mais je ne sais pas quoi en faire

Merci d'avance

Bonjour et bienvenue sur le forum

Tu écris :

J'ai pu trouver un code sur internet qui réaliserait une fonction analogue ... mais je ne sais pas quoi en faire

Alors, joins ton fichier !

Bye !