Excel : cellule auto date & délai reception Résolu/Fermé

Question

Bonjour, 

je vous sollicite pour un tableau sur excel que je suis entrain de monter pour qu'il me serve en quelque sorte de tableau de bord de suivi des commandes (consultations, commande et livraison)

Mon tableau se compose donc de 3 grandes colonnes :

CONSULTATIONS  /  COMMANDE  /  LIVRAISON

Pour la colonne CONSULTATION elle se décompose avec les 2 colonnes suivantes :

Envoyé le :
Réponse le : 

Pour rentrer les dates dans les cellules correspondantes j'utilise : CTRL ; (date du jour)

Pour la colonne COMMANDE elle se décompose avec les 2 colonnes suivantes :

Date de la commande :
Délai annoncée : 

Pour les cellules correspondantes à la date de la commande j'utilise également : CTRL ;

Par contre et la ca commence à être intéressant, pour délai annoncée je penser mettre en place une liste déroulante du type : 
1jrs / 2jrs / 3jrs / 4jrs / 5jrs / 6jrs / 7jrs / 8jrs
1 semaines / 2 semaines / 3 semaines / 4 semaines .... jusqu'a 8 semaines

Je rentrerai le délai annoncé sur le devis reçu à l'aide de cette liste déroulante.

Pour la colonne LIVRAISON elle se décompose avec les 2 colonnes suivantes :

Prévue le :
Reçue le :

Pour les cellules correspondantes à reçue le : j'utiliserais CTRL ;

Par contre, et la est ma demande, pour les cellules correspondantes à Prévue le :
Je souhaiterais qu'elle se remplisse toute seule lorsque j'aurais mis le délai prévue par le fournisseur dans la colonne COMMANDE, Délai annoncée !!!

Comment faire pour que la date de la cellule Prévue le me sorte la date prévue lorsque j'aurais rentré le délai annoncée ???

Dans ce tableau j'ai une case aussi avec la formule =AUJOURDHUI() pour savoir quelle est la date de la dernière mise à jour de mon tableau. Je pense qu'elle peut servir pour la référence pour le calcul du jour de livraison prévue par rapport au délai annoncé.

J'espère avoir été clair par rapport a ce que je souhaite mettre en place.
Je suis ouvert à toutes propositions de votre part !

Petit plus que j'ai également en tête si on arrive à faire cela serait que la case LIVRAISON prévue le si la date est dépassé ou si la date approche la case change de couleur pour attirer mon attention.

J'utilise Excel 2007

Merci d'avance
Cordialement

Vaucluse · Accepted Answer

Bonjour  
pour un  code" concernant les colonnes J K et M N:  

Private Sub Worksheet_Change(ByVal Target As Range)  
'affiche la date dans une cellule à gauche de celle activée en J ou M  
On Error Resume Next  
Dim Rw As Long  
If Target.Column = 10 Then  
'10 >>n° de la colonne d'entrée dans la feuille  
Rw = Target.Row  
Range("K" & Rw).Value = Date  
'"K" >> nom de la colonne date dans la feuille  
End If  
'>> pour rajouter des fonctions identiques, recopier le bloc If target à End if inclus avant End sub  
If Target.Column = 13 Then  
Rw = Target.Row  
Range("N" & Rw).Value = Date  
End If  
End Sub  

Nota: dans ce code, les lignes en vert (après collage)sont des lignes d'information non fonctionnelles  
les codes s"appliquent quelques soient les types entrés dans une cellule de la colonne concernée  

Bonne journée  

crdlmnt  


Demandons nous si nous ne sommes pas seuls à comprendre ce que l'on explique?

Lentz · Answer

Pour une meilleure compréhension peux tu mettre ton dossier ici :

http://www.cijoint.fr/

Merci ;)

Vaucluse · Answer

Bonjour   

En toute logique, la date de livraison correspond à la date de commande + le délai   
(et non pas la date du jour + le délai :-) 
on peut donc vous proposer, à adapter:   

Hors champ où dans une feuille masquée, faites la liste en colonne A la,liste de vos codes délais tels que vous les souhaitez (1 jour; 2 jour; 1 semaine Etc...)   
en face de chaque code , en B , mettez le nombre de jours correspondants à chaque délai   
Nommez vos champs , ce sera plus simple:   
en colonne A: nommez  >  LISTE   
en colonne A et B nommez >  CHAMP   
limitez bien aux lignes dont vous avez besoin   
(pour nommer sur 2007: ruban onglet formule, définir un nom)   
dans votre tableau:   
entrez comme prévu la date de commande, dans la colonne B à partir de B2   
placez en colonne C à, partir de C2 votre liste déroulante avec:   
Données / Validation: =LISTE   
qui vous permettra d'afficher le délai annoncé   

en colonne D en D2, la formule:   
=SI(ESTVIDE(C2);"délai ?";B2+RECHERCHEV(C2;CHAMP;2;0))   
qui ajoutera le temps du délai à la date de commande, ou affichera le texte entre guillemets si le délai n'est pas précisé.   

Pour l'alerte en D2, utilisez la mise en forme conditionnelle   
sélectionnez le champ D2 Dxx   
(Ruban / Accueil / Style / Mise en forme conditionnelle/ Nouvelle règle:   
utiliser une formule pour la formule à entrer:   
=D2>AUJOURDHUI()-15   
formatez comme souhaitez   
cette règle vous formatera la cellule lorsque vous serez à 15 jours de la date de livraison   
ajoutez une seconde règle:   
=D2>AUJOURDHUI()   
pour le dépassement de délai   

Note: si vous sélectionnez tout le tableau et bloquez les colonnes dans les formules de MFC ($D2 au lieu de D2), c'est toute la ligne du tableau qui passera au format   
bonne chance   

on vous souhaite beaucoup de commande pour 2011 pour tester ça   

Crdlmnt   

Ps: bien entendu, vous pouvez simplifier directement en B2+C2 si vous mettez directement dans la liste déroulante en C2 les jours de délai plutôt que les textes...!!


Demandons nous si nous ne sommes pas seuls à comprendre ce que l'on explique?

johannenzo · Answer

Bonjour VAUCLUSE et merci pour l'avancé dans mon tableau,

j'ai néanmoins quelques précisions a demander car j'ai appliqué ce que vous m'avais écrit et cela ne fonctionne pas ...
Je m'explique j'ai bien réalisé les listes:
celle correspondante aux délais que vous appelez liste je l'es nommé DELAIS
celle correspondante aux nombre de jours des délais je l'es nomme NBREJOURS
J'ai adapté votre formule et l'es mise en place dans mon tableau
la formule est donc devenu : 

=SI(ESTVIDE(O3);"délai ?";N3+RECHERCHEV(O3;NBREJOURS;2;0))

O3 est la cellule ou je rentre avec la liste déroulante DELAIS le délais annoncé
N3 est la cellule de la date de la commande que je rentre avec : CTRL;

Quand je fais une simulation votre formule me donne bien : 
Délais ? si rien n'est rentré

Par contre quand je rentre ma date de commande en N et le délai en O dans la cellule ou j'ai mis votre formule elle m'indique : #N/A

Je pense qu'il doit y avoir une tite erreur quelque part ?!?! 
Que veulent signifier les chiffres 2;0 à la fin de votre formule ???

Merci Beaucoup !!!
Cordialement

Vaucluse · Answer

Bonjour

j'ai regardé votre modèle, qui fonctionne très bien comme vous le montera ce fichier joint...,!

Je ne comprend toujours pas votre problème.

http://www.cijoint.fr/cjlink.php?file=cj201101/cijKVtqS1u.xlsm

Vérifiez qu'il n'y ai pas un problème d'activation des macros?

Crdlmnt