envoi de mail automatique par excel quand date arrive à échéance Résolu

Question

Bonjour, 
j'ai un fichier qui contient le  suivi d'actions ou je fais leur planification  (dates de l'échéance de chaque action)

la date de l'échéance de chaque action est en colonne N "délai de réalisation"

ce tableau est dans une feuille nommée "suivi des NC et ACAP"

est-il possible de créer une alerte quand la date de l'échéance arrivera dans 2 jours par exemple
et envoyer cette alerte à un nombre d'adresses mails

je vous remercie par avance

bien cordialement


Configuration: Windows / Chrome 80.0.3987.149

Mike-31 · Accepted Answer

Non pour supprimer des fichier il faut être contributeur minimum, j'ai déjà fait un peu le ménage  
 je regarde d'adapter le code sur ton fichier

Mike-31 · Answer

Bonjour,

Non c'est tout à fait possible en CDO
mais uniquement en code VBA (macro) si tu as quelques notions

Mike-31 · Answer

Re,

télécharge le fichier 
en colonne O tu saisis les adresses mais pour tester colle uniquement la tienne ce sera plus rapide, je t'expliquerai plus tard

ensuite en T3 sisir l'adresse mail de l'expéditeur la aussi pour tester colle ta tienne

clic sur le bouton et regarde tes mail voir si tu reçois

pour retester efface la date et l'heure colonne P qui est une preuve d'envoi automatique

ce fichier est fait pour utiliser Topnet.tn

https://mon-partage.fr/f/6ZQCUzn8/

Mike-31 · Answer

Re,

Ah bon voilà

https://mon-partage.fr/f/q0ofmuFp/

Mike-31 · Answer

Re,

As tu bien saisis ton adresse  colonne O en face chaque date de la colonne N

efface les date colonne P et clic sur le bouton

normalement tu devrais avoir en face les dates 06/04/2020 la date et l'heure un message devrait te dire qu'un mail à été expédié 
ensuite sur ton adresse Gmail tu devrais avoir un mail par date correspondante

Mike-31 · Answer

Re,

Ce n'est pas facile quand on ne peut tester l'opérateur parce qu'avec nos opérateurs Français et même Belge le code fonctionne parfaitement 
essaye ce fichier voir

https://mon-partage.fr/f/XEJi07cs/

Mike-31 · Answer

Essaye d'utiliser celle de hexabyte en T3 voir si ça ne change rien utilise la également colonne O

pour ce soir je suis obligé de décrocher

Mike-31 · Answer

Re,

le nombre d'envoi n'est pas un problème, le problème actuel est de tester les connexions Tunisienne  

essaye ce fichier sur hexabyte

https://mon-partage.fr/f/xPMHuQyH/

Mike-31 · Answer

Re,

alors essaye sur plusieurs adresse mail

ensuite pour envoyer à plusieurs adresse en même temps, dans la cellule adresse colonne O 
tu saisiss une adresse suivi d'un point virgule, d'un espace puis la seconde, point virgule, un espace etc

ce qui donne pour trois adresses
smfcharfi@gmail.com; smfcharfi@gmail.com; smfcharfi@gmail.com

safach · Answer

Bonjour,
pour mon fichier de base mes données se terminent en colonne S (je vous ai envoyé une copie) alors comment adapter votre fichier à mes données ?
merci encore

yg_be · Answer

bonjour, le plus propre et le plus sécurisé est de passer par Microsoft Outlook, si il est utilisé par l'entreprise.
est-ce le cas?

Mike-31 · Answer

sur le fichier exemple que je t'envoi, il y a droite un tableau gris avec des plage blanche sur lequel il sera possible de saisir un texte ou rapatrier les données à envoyer

amuse toi à changer le texte existant sur mon fichier simplifié et quand tout sera ok on adaptera sur ton fichier ce sera plus vite fait

safach · Answer

ça marche pour le principe de l'envoi en choisissant un expéditeur  @hexabyte 
j'ai vérifié par plusieurs adresses mails

Mike-31 · Answer

Re,

comme je te l'ai dit l'automatisation de l'envoi automatique n'est pas un problème il suffit 
d’écrire dans la Thisworkbook la ligne de commande 

Private Sub Workbook_Open()
Call le nom de la macro
End Sub

le principal dans ton cas est de trouver le code pour les opérateurs Tunisiens POP SMTP et les numéros de port
En mettant une adresse expéditeur hexabyte en T3 et divers adresses mails tout tout opérateur en colonne O es ce que tout fonctionne.

Si oui poste ton dernier fichier que j'adapte le code 
 
pour l'objet comme le corps du mail si tu regardes à droite du fichier test j'ai prévu sous forme de télégramme des zones de texte 



PS: la conversation comporte un grand nombre de post sans intérêt que je te propose de supprimer pour retrouver facilement le derniers échanges

Mike-31 · Answer

Re,

donc dans ton message veux tu cette présentation

Bonjour,
objet : Alerte

le contenu de la cellule correspondante colonne L

veux tu ici autre chose

formule de politesse : Cordialement

signature : Safach 
 
A te lire

Mike-31 · Answer

Re,

télécharge ton fichier et ouvre le
en cellule V5 saisir l'adresse mail expéditeur  hexabyte

en colonne N des dates de réalisation
colonne L l'action
clic sur le bouton

pour reéssayer le code efface les date de contrôle d'envoi colonne U

le bouton est uniquement pour tester rapidement le code pour ne pas être obligé à fermer et ouvrir le fichier pour chaque test

 https://mon-partage.fr/f/huvfOR8M/

Mike-31 · Answer

Re,

regarde cette version, en AB3 saisir l'adresse mail expéditeur avec hexabyte

colonne V les adresses destinataire et clic sur le bouton pour retester efface les dates contrôle colonne U
https://mon-partage.fr/f/zsrXS7UT/

Mike-31 · Answer

excuse je n'ai pas pris le bon fichier

regarde celui ci
https://mon-partage.fr/f/Tplz7Evx/

Mike-31 · Answer

alors la bizarre, tu as bien pris mon dernier lien !

chez moi il fonctionne parfaitement et le code est exactement le même que sur le fichier exemple 
 https://mon-partage.fr/f/Tplz7Evx/

adresse expéditeur hexbyte en AB3 mais depuis une box avec fournisseur d'accès hexabyte

colonne V les adresses destinataire et clic sur le bouton pour retester efface les dates contrôle colonne U

Mike-31 · Answer

alors c'est bon non !
tu devrais avoir

Bonjour,
 
tutu
 
les actions suivantes arrivent à écheance veuillez suivre leur application
 
Cordialement
 
service qualité 

et 
Bonjour,
 
coucou
 
les actions suivantes arrivent à écheance veuillez suivre leur application
 
Cordialement
 
service qualité

Envoi de mail automatique par excel quand date arrive à échéance

22 réponses

Discussions similaires

Newsletters