Bonjour JJM,
Merci de m'aider, la partie dont on ignore tout serait-ce: mail_frn?
car si c'est ca, il s'agit d'une page excel ou se trouve des adresses mail des différents fournisseurs avec le quel je traite.
mail_frn = Sheets('Données').Cells(ligne_a, 8).Value
a l'endroit indiqué par cette ligne se trouve les différentes adresses mail des fournisseurs.
Joindre l'application sera dur, je vais tenter d'epurer un peut car la macro est conséquente. Mais mon code fonctionne sous windows NT avec excell office 2000, mais dès que je tente d'appliquer cette macro sous XP et excel 2000 pro ou 2003 ca ne marche plus, donc je ne comprend pas, si quelqu'un a une idée, ca serait bien venu, merci bcp a toi et aux membres du forum.
Je me depeche d'épurer mon code, pour que vous y voyiez plus clair.
Merci a tous.