Discussion :

[petula972]

bonjour,
j'ai crée le tableau ci-joint, qui me permet de suivre la validité de badge.
j'aimerai que toute une ligne puisse clignoter:

1/en vert, 2 mois avant la date de validité du badge
2/en rouge, 1 mois avant la date de fin du marché

je ne suis pas loin du résultat car les lignes clignotent déja.
c'est au niveau de la MFC que ça coince, pourriez vous m'aider s'il vous plait.
J'ai déja tout essayer.

Merci d'avance

Petu

[wilfried_42]

bonjour

je viens de faire des essais, voici une autre procedure pour ton clignotement

je ne sais pas si tes MFC son corrects, mais maintenant ça clignote

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Option Explicit
Dim drapeau As Boolean
Public Sub Eclairage()
    Application.OnTime Now + TimeValue("00:00:01"), "Eclairage"
    ActiveWorkbook.Names.Add Name:="VarEclairage", RefersToR1C1:=Not drapeau
    drapeau = Not drapeau
End Sub

Attention l'action de clignotement est provoquée pas une interruption timer, qui utilise enormement de ressources machines. c'est joli certe mais extremmement déconceillé...

[petula972]

Bonjour,
Merci Wilfried de répondre à mon sujet. je vais suivre ton conseil, et enlever le clignotement.
Pourrais tu m'indiquer comment faire pour juste colorier la ligne stp?
Cependant mon gros problème reste la MFC, par rapport au moment ou la ligne va devoir se colorier. pourrais tu m'aider la aussi?

Je t'en remercie d'avance

Petu

[frolland46]

Bonjour,

Pour la couleur de fond, il y a toujours la mise en forme conditionelle, mais celle-ci n'affecte que la cellule de la date et non la ligne complète. Aussi, la référence se fait en jours et non en mois puisque le calandrier est bâti en jours.
Dans mise en forme conditionelle, tu mets inférieur à

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 =aujourdhui()+30

pour la couleur rouge
et comme deuxième condition, inférieure à

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

  =aujourdhui()+61

pour la couleur verte.

C'est une solution "à défaut de"

Salutations

[petula972]

bonjour,

je te remercie pour ta solution, je crois que quelque fois il vaut mieux effectivement aller au plus simple.

Merci

Petu