Discussion :

[tony020422]

Bonjour amis forumistes!

Je viens vers vous afin que vous m'aidiez à réaliser mon projet!

le fichier joint contient une colonne "importance" (peut etre devrais je l'appeler 'priorité' ou autre chose..ceci étant en rapport avec le courrier client) dans laquelle se trouvent les lettres "C" "N" ou "F" pour "critique" "normale" ou "faible"

il faudrait que:
les couriers "critique" soient traités sous 5 jours ouvrés (on peut faire sous 5 jours ou 7 jours tout court si c'est plus partique à programmer!)

les courriers "normale" soient traités sous 8 jours ouvrés (pareil)

les courriers "faible" soient traités sous 12 jours ouvrés (pareil)

Comme la date de réception de courrier est renseignée, comment peut on pour qu'un pop up signale qu'un courrier critique n'est tjs pas traité alors qu'il est arrivé depuis 5 jours ou plus ?! (donc arriver a comparer la date d'arrivée du courrier et la date actuelle, et envoyer le pop up si délai de réponse dépassé)

et pareil pr les autres types de courrier....

Remarque: il faudrait un pop up pr dire "Réponse client bien enregistrée" qd une réponse a été apportée ("O" dans la colonne "réponse")

Merci par avance pour vos aides !!

j'ai trouvé ca pour faire la date d'aujourd'hui:

Code :

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

[date_du_jour]= Format(Now, "dd/mm/yyyy")

et il faudrait arriver a formailser en langage VB: (exemple pour les "critiques")

Code :

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

1
2
if [date_du_jour] > date d'enregistrement + 5 (jours)
then MsgBox ....

Quelqu'un pourrait-il m'aider ?!

[Jean-Philippe André]

salut,
la date du jour est aussi disponible par la fonction Date()

concernant les 5 jours d'écart, tu peux regarder la fonction dateadd()

[tony020422]

Bonjour,

merci de t'êetre intéresser à mon problème....

je vais regarder du côté de Dateadd...

par contre la fonction date() existe signifie que je peux l'utiliser tel quel ?!
je maitrise pas trop le VB et la programmation en général

j'ai tapé ca pour essayer

Code :

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

1
2
    today = Now()
    [C8].Value = DateAdd("d", 5, today)

et ca marche sauf qu'il apparait l'heure d'aujourd'hui aussi que je ne veux pas!

et il faudrait que j'arrive a stocker la date d'aujourd'hui dans une variable pour pouvoir la comparer a la date rentrée en C4...

peut on comparer des dates entres aussi facilement qu'avec des "<" ou ">" ?!

[Invité]

Bonjour,

Essayez :

Code :

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

madate = DateAdd("d", Date, 5)

mais aussi :

Code :

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

[C8].value = DateAdd("d", Date, 5)