Dates

[Audrey]

Bonjour,
J'ai un tableau de facturation avec la date d'envoi de la facture (ex : 14/03/2006). Les fournisseurs nous payent sous 30 jours. Afin de faire les relances je cherche une formule qui me permette d'aficher la date en couleur si le délai est dépassé.
Merci de votre aide.
Audrey

 

[JORDAN]

Bonjour Audrey,

Avec une MFC
Format --> Mise en forme conditionnelle
la formule est =AUJOURDHUI()-30>A1
Puis choisir la couleur

A+

 

[jp14]

Bonjour

En utilisant la mise en forme conditionelle, la condition portant sur une cellule qui comporte une formule réalisant la fonction suivante
Si la facture n'est pas payée alors caluler le nombre de jour sinon rien.


JP

 

[Jacques87]

Bonjour Audrey

voici une procédure à placer dans un évennement par exemple à l'ouverture du fichier

en supposant que la date soit en A1

If Date > Range('A1') + 30 Then Range('A1').Interior.ColorIndex = 3

Bon courage

 

[Charly2]

Bonsoir Audrey, JORDAN, jp14 et Jacques,
bonsoir à toutes et à tous

Comme des exemples sont plus faciles à comprendre, voici la mise en oeuvre des solutions proposées par mes amis. Je tiens à préciser qu'elles sont écrites telles qu'expliquées et doivent être adaptées à ton cas

[file name=Audrey_Dates.zip size=9446]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Audrey_Dates.zip[/file]

Les 3 propositions, une fois adaptées, donnent un résultat correct. A toi de voir...

EDITION : Pour Jacques, ce n'est pas une MEFC. Lancer la mise à jour par le bouton ; voir code dans Module1, et placer dans une procédure événementielle si la solution est retenue...

A+

Message édité par: Charly2, à: 14/03/2006 23:30

Message édité par: Charly2, à: 14/03/2006 23:31

 

[Audrey]

Bonjour à tous !

Merci beaucoup pour vos réponses.
Seulement, je n'y arrive pas.
Il faut dire que excel est un peu inconnu pour moi
Je vous joins un fichier pour m'aider.
Help Help

Merci d'avance

Audrey