Salut Jérémy,

voir du côté de:
http://www.excelabo.net/excel/sortirmail.php

--
Amicalement

Jean-François Aubert
{Vaudois de la Côte Lémanique}


"Jérémy" <vilou1***hotmail.com> a écrit dans le message de news:
031af0f3-9659-4f9d-96be-aabf06b9d86a...oglegroups.com...
Bonjour,

Je travaille sous Excel et j'ai une petite macro qui me permet
d'envoyer ce classeur en tant que pièce jointe dans un nouveau message
Outlook.

Voici la ligne de commande :
Rep = Shell("""D:\Program Files\Office XP\Office10\OUTLOOK.EXE""" &
Chemin, vbMaximizedFocus)

"Chemin" représente le chemin où est enregistré le classeur Excel.

Cependant, dans ce classeur Excel, j'ai une cellule où j'ai du texte
et je souhaiterais que ce texte soit mis en objet du mail à envoyer
avec le classeur Excel.

Par Exemple :

Objet = range("a1")

J'ai essayé de faire le progreamme ci-dessous, mais cela ne fonctionne
pas:
Rep = Shell("""D:\Program Files\Office XP\Office10\OUTLOOK.EXE""" &
objet & Chemin, vbMaximizedFocus)

Merci pour votre précieuse aide

Jérémy