ça clignote !!

Le
John
Bonjour,

Dans mon fichier des heures, comment faire clignoter la cellule D7 si le
nombre d'heures à dépassé le chiffre maximal dans les paramètres ?

Par exemple en paramètre 20 h
En saisie 21 h
La cellule D7 se met à clignoter.
PS: la cellule D7 est au format [h]mm donc * par 24

Merci d'avance.
--
John.
Questions / Réponses high-tech
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Modeste
Le #11194541
Bonsour® John avec ferveur ;o))) vous nous disiez :

Dans mon fichier des heures, comment faire clignoter la cellule D7 si
le nombre d'heures à dépassé le chiffre maximal dans les paramètres ?

Par exemple en paramètre 20 h
En saisie 21 h
La cellule D7 se met à clignoter.
PS: la cellule D7 est au format [h]mm donc * par 24



une Mise En Forme Conditionnelle n'est-elle point suffisante ??
le clignotement utilise inutilement des ressources CPU
et devient rapidement horripilant !!!


--
--
@+
;o)))
John
Le #11194781
Bonjour Modeste et merci, en effet une mise en forme conditionnelle serait
suffisante, mais j'ai tenté ma chance avec le clignotement car je savais que
c'était possible, encore merci pour tes conseils.

@+
--
John.


"Modeste" a écrit :

Bonsour® John avec ferveur ;o))) vous nous disiez :

> Dans mon fichier des heures, comment faire clignoter la cellule D7 si
> le nombre d'heures à dépassé le chiffre maximal dans les paramètres ?
>
> Par exemple en paramètre 20 h
> En saisie 21 h
> La cellule D7 se met à clignoter.
> PS: la cellule D7 est au format [h]mm donc * par 24

une Mise En Forme Conditionnelle n'est-elle point suffisante ??
le clignotement utilise inutilement des ressources CPU
et devient rapidement horripilant !!!


--
--
@+
;o)))




Francois L
Le #11194951
John a écrit :
Bonjour Modeste et merci, en effet une mise en forme conditionnelle serait
suffisante, mais j'ai tenté ma chance avec le clignotement car je savais que
c'était possible, encore merci pour tes conseils.

@+



Bonjour,

Tu veux que ça clignote ? vas voir là :
http://www.excelabo.net/moteurs/motsclefs.php?mot=clignoter

Tu veux qu'on te dise que c'est une bonne idée ? alors là, ça va être
plus difficile.

--
François L
John
Le #11195111
Merci, et si on envoyé une boîte d'information à l'utilisateur ou avec donnée
validation, ça ne serait pas possible ?

@+ merci pour vos idées.
--
John.


"Francois L" a écrit :

John a écrit :
> Bonjour Modeste et merci, en effet une mise en forme conditionnelle serait
> suffisante, mais j'ai tenté ma chance avec le clignotement car je savais que
> c'était possible, encore merci pour tes conseils.
>
> @+

Bonjour,

Tu veux que ça clignote ? vas voir là :
http://www.excelabo.net/moteurs/motsclefs.php?mot=clignoter

Tu veux qu'on te dise que c'est une bonne idée ? alors là, ça va être
plus difficile.

--
François L



Modeste
Le #11195441
Bonsour® John avec ferveur ;o))) vous nous disiez :

Merci, et si on envoyé une boîte d'information à l'utilisateur ou
avec donnée validation, ça ne serait pas possible ?
"Francois L" a écrit :
Tu veux que ça clignote ? vas voir là :
http://www.excelabo.net/moteurs/motsclefs.php?mot=clignoter
Tu veux qu'on te dise que c'est une bonne idée ? alors là, ça va être
plus difficile.





;o)))
http://cjoint.com/?hfpZattb6u


--
--
@+
;o)))
John
Le #11195761
Merci Modeste pour ton exemple
--
John.


"Modeste" a écrit :

Bonsour® John avec ferveur ;o))) vous nous disiez :

> Merci, et si on envoyé une boîte d'information à l'utilisateur ou
> avec donnée validation, ça ne serait pas possible ?
> "Francois L" a écrit :
>> Tu veux que ça clignote ? vas voir là :
>> http://www.excelabo.net/moteurs/motsclefs.php?mot=clignoter
>> Tu veux qu'on te dise que c'est une bonne idée ? alors là, ça va être
>> plus difficile.

;o)))
http://cjoint.com/?hfpZattb6u


--
--
@+
;o)))




Hervé
Le #11198911
Bonjour John,

Regarde si cela peut aller. La valeur testée est en A1 (cellule qui
clignote) et la valeur comparée est en D7, adapte à tes besoins.

A mettre dans le module de la feuille :
---------------
Private 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(Cel1 As Range, _
Operateur As String, _
Cel2 As Range)
'gère l'erreur du non numérique
On Error GoTo Fin
'évalue la comparaison et clignote si faux
Do While Evaluate(Cel1.Value & Operateur & Cel2.Value)
Cel1.Interior.ColorIndex = 3
Minuterie 300
Cel1.Interior.ColorIndex = 0
Minuterie 300
Loop
Fin:
Cel1.Interior.ColorIndex = 0
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
'si A1 est supérieur à D7
'clignotement jusqu'à la modif.
'de la cellule A1
Clignote [A1], ">", [D7]
End Sub
--------------

Hervé.


"John"
Bonjour,

Dans mon fichier des heures, comment faire clignoter la cellule D7 si le
nombre d'heures à dépassé le chiffre maximal dans les paramètres ?

Par exemple en paramètre 20 h
En saisie 21 h
La cellule D7 se met à clignoter.
PS: la cellule D7 est au format [h]mm donc * par 24

Merci d'avance.
--
John.


Publicité
Poster une réponse
Anonyme