XL 2016 Insérer les valeurs de 2 cellules dans l'objet d'un mail

Al1_44

XLDnaute Junior
Bonjour le forum,

Après l'archivage d'une ligne, je souhaite envoyer un mail au service concernée pour informer du travail terminé.
Après parcours sur le forum j'ai trouvé un bout de code que j'essaie d'adapter à mon besoin qui est :
De mettre dans l'objet du mail, les valeurs des cellules C et D qui viennent d'être archivées.

Cordialement,
AL1-44
 

Pièces jointes

  • Test Mail.xlsm
    25.2 KB · Affichages: 4

Oneida

XLDnaute Impliqué
Bonjour,
Vous avez fait deux fois
VB:
    DerligDst = WsDst.Range("A" & Rows.Count).End(xlUp).Row + 1
La premiere suffit, la deuxieme donne le premiere celllule vide de la colonne
 

Pièces jointes

  • Test Mail.xlsm
    24.5 KB · Affichages: 4

Al1_44

XLDnaute Junior
Bonjour Oneida,

Merci pour la réponse, impeccable cela marche nickel.

J'ai une question subsidiaire, si dans l'onglet Planning, la cellule de la colonne AA contient un x (qui se retrouve dans l'onglet Archive dans la colonne S) il faudrait mettre à la suite du contenu de l'objet du mail "toto".
Exemple pour la ligne 10 on aurait :
K15 L15 toto
 

Phil69970

XLDnaute Barbatruc
Re

@Al1_44

J'ai une question subsidiaire, si dans l'onglet Planning, la cellule de la colonne AA contient un x (qui se retrouve dans l'onglet Archive dans la colonne S) il faudrait mettre à la suite du contenu de l'objet du mail "toto".
De ce qu j'ai compris je te propose la V2

Merci de ton retour
 

Pièces jointes

  • Archivage et envoi mail sur double clic V2.xlsm
    33.7 KB · Affichages: 6

Al1_44

XLDnaute Junior
Merci phil69970 et merci Oneida,
Tout fonctionne parfaitement.
C'est souvent pareil, une fois que l'on voit la solution, on se dit j'aurais pu trouver.
En tout cas merci à vous deux.
Je met Phil en résolu, car comme dit dans un film, "Il ne peut en rester qu'un"... si je me rappelle bien !
Bonne journée à tous,
 

Discussions similaires

Statistiques des forums

Discussions
314 708
Messages
2 112 097
Membres
111 416
dernier inscrit
philipperoy83