Céllule qu Clignote

Bonjour;

Dans mon classeur j'essaye de mettre des alertes, j'ai procéder par le mise en place de MFC et ça marche bien, sauf que je veux attiré plus l'attention de l'utilisateur sur des parties de la feuille de calcul. Alors comment faire clignoter une cellule qui répond à un critère. Merci à Tous et Bon Courage

Hosni

Salut à Tous

Je n'ai pas reçu de réponse, est-il impossible à réaliser ou difficile à faire, Quelqu'un peut-il apporter de l'eau à mon moulin?

Merci à tous

Hosni

Bonjour

Tu as plusieurs exemples sur cette page, en dessous de ce message

Cordialement

Salut à tous

En fait je venais juste de consulter les exemples en dessous, merci pour ta réponse t'es toujours au RDV

Amicalement; Hosni

Salut le forum

En utilisant un Style

  • Pour créer une cellule qui clignote :
  • Définit un nouveau style (format/style/Flash/ajouter)
  • Applique le à la cellule que tu choisis
  • Place le code suivant dans un module de feuille
Dim NextTime As Date

Sub Flash()
 NextTime = Now + TimeValue("00:00:01")
 With ActiveWorkbook.Styles("Flash").Font
  If .ColorIndex = 2 Then .ColorIndex = 3 Else .ColorIndex = 2
 End With
 Application.OnTime NextTime, "Flash"
End Sub

Sub StopIt()
 Application.OnTime NextTime, "Flash", schedule:=False
 ActiveWorkbook.Styles("Flash").Font.ColorIndex = xlAutomatic
End Sub
  • Code dans ThisWorkbook
Private Sub Workbook_BeforeClose(Cancel As Boolean)
StopIt
End Sub

Private Sub Workbook_Open()
Flash
End Sub

Le texte clignote entre rouge et blanc.

Mytå

Bonjour à Tous

Salut à toi Mytâ.

Je viens de consulter ta réponse et je t'en remercie beaucoup, toujours efficace, je travaille sous Excel 2010, dans l'onglet Acceuil/Style/Style de Cellule, en bas nouveau style, je crée mon style de cellule et je met les code au bon Endroit, mais rien ne se passe, Alors j'ai pas bien saisie ou un problème ? n'abuserais-je pas de ton indulgence en te demandant de m'envoyer un classeur teste? Merci @+

Hosni

Re le forum

Un fois que tu as créer ton style, tu dois retourner sur la cellule et dans Style > Personnalisé

Et tu cliques sur Flash.

La police de la cellule va passer du rouge au blanc.

Mytå

Re Bonjour

Salut Mytâ

Je pense que je dois revoir ce que j'ai fait jusque là, c'est pas pour tous de suite mais je te tiendrai au courant.

Merci de ton attention, Hosni, @+

salut

c'est très intéressant votre code

j'ai excel 2016 mais ça marche pas

svp un fichier démo

Rechercher des sujets similaires à "clignote"