XL 2016 Envoi mail Excel VBA + Mention d'un contact dans le corp du message

[Maxou69]

Bonjour à tous,

Aujourd'hui je cherche à mentionner un contact dans le corp de mon mail que j'ai programmer au préalable en VBA
J'ai déjà le code VBA pour envoyé mon mail avec une pièce jointe, ca c'est tout ok

  With Destwb
        .SaveAs TempFilePath & TempFileName & FileExtStr, FileFormat:=FileFormatNum
        On Error Resume Next
        With OutMail
            .To = "xxxx@xxx.com"
            .CC = Range("D10")
            .Subject = Range("d16") & " " & "-" & " " & Range("b7") & " " & Range("d7") & " " & "-" & " " & "XXXXXX"
            .Body = ThisWorkbook.Worksheets("RANDOMSHEETS").Range("AC2")
            .Attachments.Add Destwb.FullName
            'You can add other files also like this
            '.Attachments.Add ("C:\test.txt")
            .Display
        End With

Le corp de mon mail est le texte d'une cellule qui est sur une feuille de mon classeur
Dans cette cellule j'ai :
"Bonjour Machin, ci joint le fichier XXX, @Tartenpion, peux tu valider ?"
Tout s'effectue correctement, je voudrais juste que dans le corp de mon mail le @Tartenpion soit mentionner dans le mail et pas que j'ai juste le @tatenpion en tant que texte

Est ce que c'est possible ? Est ce que je dois plutôt écrire mon corp de message dans le VBA et ajoutée un formule pour que ce fonctionne ?

J'espères que ma question est claire et que ce n'est pas trop brouillon

Merci par avance pour votre aide

Bonne journée à vous

 

[fanch55]

Bonjour,

.Body = Replace(ThisWorkbook.Worksheets("RANDOMSHEETS").Range("AC2"),"@Tartenpion","Melle Larose")