Re cellule clignotante
bonjour,
ce sujet a déja été traiter, mais il me pose problème.
je veux faire clignoter des cellules de mon tableau. pour cela j'ai retenu dans differents sujet le code suivant:
Option Explicit
Dim vNow As Variant
Public Sub Eclairage()
vNow = Now + TimeValue("00:00:01")
Application.OnTime vNow, "Eclairage"
ActiveWorkbook.Names.Add Name:="VarEclairage", RefersToR1C1:=1 - [VarEclairage]
End Sub
Public Sub ArrêtEclairage()
Application.OnTime EarliestTime:=vNow, _
Procedure:="Eclairage", Schedule:=False
ActiveWorkbook.Names.Add Name:="VarEclairage", RefersToR1C1:=1
End Subseulement je bug tout le temps (erreur 13)
le problème à l'air de ce trouver a la ligne:
ActiveWorkbook.Names.Add Name:="VarEclairage", RefersToR1C1:=1 - [VarEclairage]pouvez vous m'aider svp?
ci-joint une copie de mon tableau
merci d'avance
https://www.excel-pratique.com/~files/doc/DAk81Classeur1.xls
cordialement
petu
Bonjour
En adaptant ton fichier, tu as oublié 2 choses:
1) Définir le Nom VarEclairage
2) Utiliser ce nom dans la mise en forme conditionnelle.
https://www.excel-pratique.com/~files/doc/RksGNDAk81Classeur1.xls
Cordialement
Re,
Est ce que tu pourrais me proposer d'autre type d'alerte stp car le clignotement me parait un peu instable (msg d'erreur, barre de formule qui bouge etc...).
En fait il me faudrait quelquechose de vraiment voyant car c'est pour mon chef qui a tendance à oublier.
je te remercie d'avance pour ton aide
Petu
Bonjour
Pour ma part, je viens de reprendre le fichier et je n'ai pas de msg d'erreur.
Pour ce que tu appelles de l'instabilité, rien à faire, le fait d'activer le timmer engendre le clignotement et se répercute sur le sélecteur.
Je me suis borné à répondre à ta demande.
Nul doute que si d'autres "forumeurs" voient ton message, ils essaieront d'apporter une autre solution.
Pour rendre la cellule clignotante plus visible, tu peux toujours mettre la couleur de la cellule en rouge, ou appliquer la MFC à toute la ligne.
Cordialement
re,
merci beaucoup amadeus.
cette solution me convient
a bientôt