envoyer classeur actif par mail

[nisuc]

bonjour à tous
je souhaite envoyer un classeur actif par mail via outlook.
les 3 éléments récurrents pouvant être inscrits en dur sont:
les adresses (2)
le sujet
le corps du message

avez vous une petite macro qui va bien
merci de votre aide
philippe

 

[wilfried_42]

Re : envoyer classeur actif par mail

Bonjour

le classeur en cours ? dur dur, le fichier etant ouvert, il est considéré comme occupé.......
il va falloir faire une partie de passe passe pour le faire

enregistrement sous un autre nom, envoi du fichier et quitter le classeur

donc : sauvegarde : thisworkbook.save
donc : sauvegarde sous : thisworkbook.saveas filename:="save.xls"
qqqqqqenvoi du fichier
puis enfin femeture du fichier et quitter l'application

ps: pas besoin d'outlook

 

[nisuc]

Re : envoyer classeur actif par mail

merci mais cela ne m'aide pas
je souhaite avoir ce résultat (macro ci-dessous) mais en rajoutant juste du texte (tjrs le même) dans le corps du message


Sub envoiMailclasseurActif()

Application.Dialogs(xlDialogSendMail).Show "forum@xld.fr", "Test d'envoi "

End Sub

cette macro fonctionne bien, elle ouvre un nouveau message dans outlook, avec en pj le classeur actif, elle renseigne le destinataire et l'objet mais comment rajouter du texte dans le corps du message ?
merci

 

[Carnage029]

Re : envoyer classeur actif par mail

Bonjour à tous, je fais remonter un sujet très vieux, mais j'ai repris la macro qui fonctionne comme je le souhaite,

J'aimerai juste renommer le fichier excel joint au message, sans changer le fichier excel de base...

Merci à vous 🙂

 

[piga25]

Re : envoyer classeur actif par mail

Bonjour,

Edit: effacement car ce n'est pas le bon post.