Inclure une information d'une cellule dans l'envoie auto de mail

Bonjour,

je suis novice en VBA, j'ai trouvé un code pour l'envoie de mail automatique suivant condition,c'est un fichier pour la remise de médaille du travail, je reçois le mail suivant le type de médaille cela fonctionne je reçois xmail et je voudrais inclure l'information d'une autre cellule qui contient le nom de l'agent,

Pour un autre script msgbox, cela fonctionne.

merci

Bonjour,

Le nom est bien présent dans la macro

valeur = Cells(medaillers.Row, 1)

pour le prénom

prenom = Cells(medaillers.Row, 2)

où veux-tu le mettre ensuite dans le mail ?

Essaie comme ceci

.Body = Email_Body & Cells(medaillers.Row, 1) & " " & Cells(medaillers.Row, 2)

dans chaque code VBA

on aurait pu tout rassembler dans un seul code du reste, à voir par la suite

Merci, c'est cool, mais je me loupe quelques part, avec msgbox il y a un critère 1 ou 2 ou 3 cela fonctionne, mais avec then "sendmail" cela m'envoie par mail l'ensemble, soit 150 Mails au lieu des médaillers.

merci beaucoup

patrick

JMBVARCAV83240 a écrit :

avec msgbox il y a un critère 1 ou 2 ou 3 cela fonctionne,

parce que tu as mis des conditons

    
       If medaillers = "1" Then
 '...
      If medaillers = "2" Then
'...
      If medaillers = "3" Then
'...

fais la même chose pour les mails

Bonsoir et merci,

j'arrive pas à mettre dans le corps du texte les infos, le then ok, j'ai le bon envoie de mail, mais dés que je remplie la ligne ebody sa ne fonctionne plus.

Merci de votre aide, et je met un certain temps pour vous répondre, car j'essaye de comprendre

bien cordialement

ok

je vais voir ... mais ton code est on ne peut plus mal organisé !!

je vais y arriver sans trop y retoucher

quelle macro lances-tu ? car il y en a 3 avec des mails ....

Bonsoir,

J'ai fait trois sendmail pour chaque type de médailles, et la macro avec la condition pour l'envoie, lorsque j'active la condition je me sert du premier sendmail,

La trois mails partent comme voulu, mais sans les infos, sa beug,

Merci

A tester

Attention, j'ai fait le ménage ...

Merci, et je vais prendre le temps de comprendre chaque ligne, le script sendmail et fortement épuré et simplifié.

Merci beaucoup à moi maintenant de comprendre et de pouvoir le mettre en oeuvre pour d’autre utilisations.