Bonjour ptiterose,
Voici le fichier Excel d'exemple, en pièce jointe au format ZIP.
C'est une démo, donc tu pourras l'adapter en fonction de tes besoins (zones rapatriées à partir d'une autre feuille ou en dur dans le programme).
La feuille contient une zone de destinataires ('Pour:'), une zone 'Objet:', une zone message sur plusieurs lignes et une zone 'PJ' (Pièce jointe).
Plus un bouton pour envoyer le message complet via OE.
Plus une cellule de test (en 'C33') contenant une valeur.
Si la valeur de cette cellule est modifiée et qu'en plus elle est supérieure à 1000, le message sera envoyé aux destinataires.
Il n'est pas nécessaire de charger OE avant, mais il sera lancé de toute façon, automatiquement (il faut bien quelqu'un pour travailler...
).
Si tu fais [Alt]-[F11] tu tomberas sous VBE (VBA Editor).
Feuil1 (Demo) contient la commande liée au bouton et une procédure détectant le changement valide (> 1000) ou non du contenu de la cellule 'C33', pour décider d'envoyer le message ou l'ignorer.
Le module 'Messagerie' contient le coeur de cet utilitaire VBA.
Il te faut 'Mettre A Jour' le chemin de localisation d'OE, s'il est différent.
Si la zone PJ est vide, une fenêtre s'ouvrira pour te permettre d'en désigner une. Si tu ne souhaites pas utiliser de PJ, insère simplement un commentaire (') devant l'avant dernière instruction (SendKeys), pour l'invalider.
Si tu veux pouvoir tester ligne à ligne (par [F8] successifs) ce qui se passe et voir le contenu des variables (en positionnant le curseur dessus), retire l'apostrophe devant 'Stop' (SendKeys ne fonctionnera pas dans ce cas).
Voilà voilà...
[file name=DemoMessagerieOE.zip size=14044]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/DemoMessagerieOE.zip[/file]
Message édité par: JJM, à: 08/07/2005 15:52