Clignoter une cellule sous une condition

Salut,

C'est tout à fait possible d'écrire un code VBA, mais quelle sont les conditions qui déclenche ce clignottement et sur quelle cellule

En VBA je sais le faire :

sub clignot()
dim n As nbr
Dim debutAs Variant
Dim i As Integer
If [A1] >= 100 Then
Const Texte As String = ""
For i = 1 To 4
Cells(1, 1).Font.ColorIndex = 8
Cells(1, 1).Interior.ColorIndex = 4
For n = 1 To 10
debut = Timer
Do While Timer < debut + 1 / 100
Loop
If n Mod 5 = 0 Then
Cells(1, 1).Interior.ColorIndex = xlNone
Cells(1, 1).Font.ColorIndex = 1
End If
Next n
Next i
End If
Exit Sub
End Sub

C'est le passage de xlNone à une autre couleur qui provoque le clignotement.

Bonjour,
Merci pour votre reponse,
Lorsque je saisie une valeur dans la cellule A1 >=100 il ne me donne rien.
lors j'ai afecte une macro à ce programme il me donne ce message "erreur de compilation : Type defini par l'utilisateur non defini"; la ligne 2 : Dim n As nbr.
Comment faire pour avoir lorsque je saisie une valeur, automatiquement me donne la cellule clignotte.
Merci bien de votre aide.

bonjour,
Merci pour votre comprehension, je veux dans la colonne A lorsque je saisie une valeur superieur ou egal à 100 il faut que la cellule clignote. Esperant mnt que je suis clair.
Cordialement.

Re,

Regardes le fichier joint voir si c'est ce que tu cherches, l'exemple prend en compte les cellules de A1 à A100

https://www.cjoint.com/?cxrZqKQwqS

Bonjour,
Merci bien pour votre aide, c'est ok

bonjour;
on peut faire ça par la mise en forme conditionnelle sans passer par un macro.

bonjour, vous tous, je suis dans la galère, parce que le lien n'est plus disponible,
pourriez me donner les détails de cette macro, j'ai bien copier/coller, le code macro, mais rien ne fonctionne
par avance merci
Éric