Logo par mail

[tf1]

Bonjour

je souhaite envoyer un mail avec Gmail depuis Excel avec logo qui se trouve sur la page.

Pour sa je joint un fichier pour exemple

Merci de votre aide

 

[tf1]

Re : Logo par mail

bonjour a tous je suis étonné que personne ne me propose de solution !!!!!!!

est il possible de faire sa ?

merci

 

[mapomme]

Re : Logo par mail

Bonjour à tous,

Une vidéo très récente de DontFretBrett pour montrer comment envoyer un message avec une image via gmail... (c'est en anglais mais pour les réfractaires le code vba est écrit simultanément). La vidéo semble démontrer que chat est possible 🙂

L'auteur nous offre son code ICI

Oups ! J'avais mal lu votre demande et pas ouvert le fichier. Vous utilisez déjà la méthode mentionnée dans la vidéo. Le fichier image est attaché. Cependant il semble qu'on puisse utiliser du HTML, et, on devrait pouvoir bricoler quelque chose pour insérer une image dans le corps.

[video=youtube;cOhupIT0rNA]http://www.youtube.com/watch?v=cOhupIT0rNA[/video]

 

[Guest]

Re : Logo par mail

Bonsoir tous,

Ce qui est certain c'est que le corps du message doit être en HTML. Apparement il faut joindre comme un autre attachement le fichier image et passer à la balise html img l'identifiant (cid) de la pièce jointe à incorporer dans le corps sous forme "<img src='cid:nomimage.jpg' >".

J'ai testé sur plusieurs boîtes avec des effets différents.

Dim pj As String
D = Range("E6").Value
E = Range("G2").Value
S = Range("G4").Value
T = "<p>" & Range("B10").Value & "</p><br /><br /><p>" & Range("B12").Value & "</p><br /><br /><p>" & Range("B13").Value & "<p>" & Range("B14").Value & "</p>"
T = T & "<br /><img src='cid:telephone.jpg' >"
Dim Cdo_Message As New CDO.Message
Set Cdo_Message.Configuration = GetSMTPServerConfig()
pj = "fichier.pdf"
With Cdo_Message
.To = "xxxxx@gmail.com"
' .CC = CC
.From = "yyyy@gmail.com"
.Subject = "test et essais"
.HTMLBody = T
If Not IsMissing(pj) Then
'.AddAttachment pj
.AddAttachment "C:cheminverlefichierimage\telephone.jpg"
End If
.Send
End With
A+

[edition] si ça marche tu pourras dire merci à JCGL qui a du subir mes tests.