Faire clignoter cellule avec dates dépassées

YANOU

XLDnaute Junior
Bonjour.
J'ai besoin de reconduire des documents tous les 6 mois.
Afin de de pas me faire prendre par le temps, je voudrais faire clignoter une cellule (dans la colonne F) 15 jours avant échéance (en rouge si possible).
Exemple : Une date dans la cellule D2 (22/01/2015) - Une date dans la cellule E2 (21/01/2015=D2 + 6 mois - 1 jour) et donc une alarme 15 jours avant l'échéance (06/01/2016) que je voudrais faire clignoter.
Merci pour votre aide.
 

Pièces jointes

  • reconduction.xlsm
    36.6 KB · Affichages: 44
  • reconduction.xlsm
    36.6 KB · Affichages: 42
  • reconduction.xlsm
    36.6 KB · Affichages: 47

st007

XLDnaute Barbatruc
Re : Faire clignoter cellule avec dates dépassées

Bonjour,
Genre à l'activation de l'onglet vérification.
Si la date en colonne F est dépassée, on fait clignoter la valeur en colonne D.
 

Pièces jointes

  • reconduction.xlsm
    38.3 KB · Affichages: 55
  • reconduction.xlsm
    38.3 KB · Affichages: 53
  • reconduction.xlsm
    38.3 KB · Affichages: 59

YANOU

XLDnaute Junior
Re : Faire clignoter cellule avec dates dépassées

Bonjour à tous et merci pour votre aide.
st007 un problème au niveau du VB : "Erreur de compilation : Variable non définie".
En fait il faudrait faire clignoter, par exemple, la date dans la case E2 quand la date dans la case F2 est dépassée et ceci à l'ouverture du fichier.
Merci à vous.
 

Bebere

XLDnaute Barbatruc
Re : Faire clignoter cellule avec dates dépassées

bonjour
bienvenue Yanou
edit: adapté un code de MDF
 

Pièces jointes

  • reconductionClignote.xlsm
    38 KB · Affichages: 57
  • reconductionClignote.xlsm
    38 KB · Affichages: 44
  • reconductionClignote.xlsm
    38 KB · Affichages: 49

YANOU

XLDnaute Junior
Re : Faire clignoter cellule avec dates dépassées

Bonjour Bebere.
Si je rentre le 25/01/2015 dans la case D2, cela me donne une alarme dans la case E2 au 09/07/2015 (date non encore dépassée) et pourtant clignotante ?
Si je rentre le 10/04/2014 dans la case D2, cela me donne une alarme dans la case E2 au 24/10/2014 (date dépassée) et pourtant la case ne clignote pas ?
En fait, plus clairement, si la date dans la case F2 est < ou = à la case J1, faire clignoter la case E2.
Je n'y connais rien en VBA, j'ai tenté de modifier la ligne de votre code " If Month(cel) = mois And x <= 15 Then", mais mes compétences non pas permis un miracle...

Merci pour votre aide.
 

YANOU

XLDnaute Junior
Re : Faire clignoter cellule avec dates dépassées

Bonjour à tous.
Merci st007 pour ton aide.
A l'ouverture du fichier, j'ai:
"Erreur d'exécution '1004' : La méthode 'Rows' de l'objet'_Global' a échoué".
Peut-être dû au Graph de l'onglet 2 ?
En fait, il faut supprimer les 2 premiers onglets "tarifs" et Graph1" (pas besoin) et ne garder que "verification", ...milles excuses !
Est-il possible d'avoir le clignotement à l'ouverture du fichier et ceci jusqu'à modification de la date ?
J'essaie de mettre le museau dans le code VBA, mais sans base, la tâche reste ardue !
Merci encore pour votre aide.
 

Bebere

XLDnaute Barbatruc
Re : Faire clignoter cellule avec dates dépassées

bonjour Yanou,St007
dans Function getPlageCible ligne commentée 'changer içi
 

Pièces jointes

  • reconductionClignote.xlsm
    38.4 KB · Affichages: 58
  • reconductionClignote.xlsm
    38.4 KB · Affichages: 55
  • reconductionClignote.xlsm
    38.4 KB · Affichages: 44

Discussions similaires

Statistiques des forums

Discussions
312 074
Messages
2 085 070
Membres
102 770
dernier inscrit
mathieu.lemaitre