Clignotement de cellule

Philippe.R

09/11/2003 à 19:17

Bonsoir Gérard,
Une recherche avec le mot clignoter à cette adresse

http://www.excelabo.net/moteurs/moteurmultisites.php

fournit 6 réponses ; il devrait y avoir ce que tu cherches
--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"GEGE" a écrit dans le message de
news:

Y a-t-il un moyen de faire clignoter une cellule dans excel (soit le fond,
soit le contenu ) ?
Merci par avance de l'info.

GL

Hervé

09/11/2003 à 20:24

Salut Gégé,

Declare Function GetTickCount Lib "Kernel32" () As Long

Sub Minuterie(Milliseconde As Long)
Dim Arret As Long
Arret = GetTickCount() + Milliseconde
Do While GetTickCount() < Arret
DoEvents
Loop
End Sub

Sub Clignote()
Dim I As Integer
Do While I < 10
[A1].Interior.ColorIndex = 3
Minuterie 500
[A1].Interior.ColorIndex = 0
Minuterie 500
I = I + 1
Loop
End Sub

Hervé.

"GEGE" a écrit dans le message news:

Y a-t-il un moyen de faire clignoter une cellule dans excel (soit le fond,
soit le contenu ) ?
Merci par avance de l'info.

GL

Rodjor

09/11/2003 à 20:42

"Hervé" a écrit dans le message de
news:%

Salut Gégé,

Declare Function GetTickCount Lib "Kernel32" () As Long

Sub Minuterie(Milliseconde As Long)
Dim Arret As Long
Arret = GetTickCount() + Milliseconde
Do While GetTickCount() < Arret
DoEvents
Loop
End Sub

Sub Clignote()
Dim I As Integer
Do While I < 10
[A1].Interior.ColorIndex = 3
Minuterie 500
[A1].Interior.ColorIndex = 0
Minuterie 500
I = I + 1
Loop
End Sub

Et sans macro est-ce possible?

FxM

09/11/2003 à 21:07

Bonsoir,

Et sans macro est-ce possible?
Directement sans macro ni macro complémentaire, c'est non.

@+
FxM

Charles

09/11/2003 à 21:50

Il me semble qu'avec exell 97 on pouvait faire clignoter des cellules en
tripatouillant dans les formats conditionnels, mais avec exell XP ??

--

Charles

.
"Rodjor" a écrit dans le message de news:
3fae980c$0$13281$

"Hervé" a écrit dans le message de
news:%
Salut Gégé,

Declare Function GetTickCount Lib "Kernel32" () As Long

Sub Minuterie(Milliseconde As Long)
Dim Arret As Long
Arret = GetTickCount() + Milliseconde
Do While GetTickCount() < Arret
DoEvents
Loop
End Sub

Sub Clignote()
Dim I As Integer
Do While I < 10
[A1].Interior.ColorIndex = 3
Minuterie 500
[A1].Interior.ColorIndex = 0
Minuterie 500
I = I + 1
Loop
End Sub

Et sans macro est-ce possible?

Philippe.R

09/11/2003 à 22:23

Bonsoir Charles,
La MEFC le permet bien avec Excel 2002 ; par exemple :
si la formule est =MOD(MINUTE($H$5);2)=0
H5 contenant la formule =maintenant()
fonctionne
--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"Charles" a écrit dans le message de
news:3faea8b3$0$4014$

Il me semble qu'avec exell 97 on pouvait faire clignoter des cellules en
tripatouillant dans les formats conditionnels, mais avec exell XP ??

--

Charles

.
"Rodjor" a écrit dans le message de news:
3fae980c$0$13281$

"Hervé" a écrit dans le message de
news:%
Salut Gégé,

Declare Function GetTickCount Lib "Kernel32" () As Long

Sub Minuterie(Milliseconde As Long)
Dim Arret As Long
Arret = GetTickCount() + Milliseconde
Do While GetTickCount() < Arret
DoEvents
Loop
End Sub

Sub Clignote()
Dim I As Integer
Do While I < 10
[A1].Interior.ColorIndex = 3
Minuterie 500
[A1].Interior.ColorIndex = 0
Minuterie 500
I = I + 1
Loop
End Sub

Et sans macro est-ce possible?

Jean-François Aubert

09/11/2003 à 22:51

Bonsoir,

Il me semble qu'avec exell 97 on pouvait faire clignoter des cellules en
tripatouillant dans les formats conditionnels, mais avec exell XP ??

Avec Word 97 ou 2000 : oui
Format / Police / Animation

Excel 97 ou 2000 , même avis que François-Xavier : non

--
Amicalement

Jean-François Aubert
{Vaudois de la Côte Lémanique}

FxM

09/11/2003 à 23:36

Bonsoir Jean-François,

Il me semble qu'avec exell 97 on pouvait faire clignoter des cellules en
tripatouillant dans les formats conditionnels, mais avec exell XP ??

Avec Word 97 ou 2000 : oui
Format / Police / Animation

Excel 97 ou 2000 , même avis que François-Xavier : non

Après réflexion, ça ne doit pas être impossible avec une MEFC tenant
compte des secondes et des conditions qui vont bien (Merci Philippe).
J'ai toutefois un gros doute sur la viabilité du classeur en termes de
vitesse de calcul, de facilité de programmation et de maintenabilité /
évolutions.
Je crains que ça ne devienne une usine à gaz ;o)

@+
FxM

gee-dee-

09/11/2003 à 23:47

Bonsoir,
en effet la MEFC sous EXCEL 2002 fonctionne
=(MOD(SECONDE(MAINTENANT());2)=0)

mais .....mais .....
il faut tripatouiller la touche F9 !!!!!!
;-))))

a.. La fonction MAINTENANT n'est pas mise à jour de façon continue. Elle
n'est modifiée que si la feuille de calcul est recalculée ou si la macro
contenant cette fonction est exécutée.

@+

GEGE

10/11/2003 à 19:52

Merci pour ces astuces, bien qu'elles ne soient pas vraiment simples à
mettre en oeuvre.

Gege

"FxM" a écrit dans le message de
news:%

Bonsoir Jean-François,

Il me semble qu'avec exell 97 on pouvait faire clignoter des cellules en
tripatouillant dans les formats conditionnels, mais avec exell XP ??

Avec Word 97 ou 2000 : oui
Format / Police / Animation

Excel 97 ou 2000 , même avis que François-Xavier : non

Après réflexion, ça ne doit pas être impossible avec une MEFC tenant
compte des secondes et des conditions qui vont bien (Merci Philippe).
J'ai toutefois un gros doute sur la viabilité du classeur en termes de
vitesse de calcul, de facilité de programmation et de maintenabilité /
évolutions.
Je crains que ça ne devienne une usine à gaz ;o)

@+
FxM

Clignotement de cellule

10 réponses

Veuillez sélectionner un problème