Macro excel ouvrir outlook mettre le classeur actif en piece jointe

Fermé
Andyandy - 14 août 2014 à 15:04
m@rina Messages postés 21182 Date d'inscription mardi 12 juin 2007 Statut Contributeur Dernière intervention 16 décembre 2024 - 23 août 2014 à 01:17
Bonjour,
J'ai beaucoup cherché sur les forums avant de poster ma demande, malgré tout mes efforts impossible de creer une macro me Permettant à la fois (depuis excel) d'ouvrir outlook en mettant le classeur actif en piece jointe et surtout de ne pas l'envoyer automatiquement.
Jusqu'ici j'arrive a envoyer le fichier en pj mettre des destinataires un sujet, mais le mail par sans aucune action de ma part. Je souhaiterai que le mail parte manuellement afin de pouvoir au preable ajouter du texte. ( impossible de faire la macro en y ajouter un texte precis car celui change constamment)
Merci de votre aide.

A voir également:

2 réponses

hugovanier Messages postés 22 Date d'inscription jeudi 18 juin 2009 Statut Membre Dernière intervention 25 août 2014 2
22 août 2014 à 18:43
Peut-être une piste?

Application.Dialogs(xlDialogSendMail).Show
0
m@rina Messages postés 21182 Date d'inscription mardi 12 juin 2007 Statut Contributeur Dernière intervention 16 décembre 2024 11 368
23 août 2014 à 01:17
Bonjour,

S'il s'agit juste d'ouvrir un nouveau message Outlook avec la PJ jointe, et que tout le reste est à compléter "à la main", je ne vois pas bien l'intérêt de la macro puisque la fonction existe...

Selon ta version, il suffit d'ajouter la commande dans une menu, sur la barre d'outils rapide ou sur le ruban.

Maintenant, s'il y a des choses qui seront toujours identiques, en particulier les destinataires, tu peux créer les variables dans la macro, avec des inputbox que tu rempliras où modifieras si nécessaire.

Regarde ici (c'est pour Word mais c'est exactement le même code pour Excel) :
https://faqword.com/index.php/word/faq-word/vba-solutions/463-comment-creer-un-bouton-qui-envoie-le-fichier-en-cours

En début de macro tu ajoutes tes inputbox, et à la place des variables, tu mets le résultat de l'inputbox.

Par exemple :

message=inputbox ("Quel est le message")
monItem.Body = message

sachant que l'inputbox peut être pré-remplie avec un message par défaut.

m@rina
0