OVH Cloud OVH Cloud

Coller cellule dans un nouveau mail !

2 réponses
Avatar
Gus
j'aimerai coller une plage de cellules d'une feuille excel sur un nouveau
mail mais dans le corps du message , pas en piece jointe.
Manuellemntt c'est faisable et ça marche tres bien en gardant meme la mise
en forme des cellule d'origine...
La question est comment le faire en vba ?
Voici comment je procede :
Private Sub CommandButton5_Click()
Dim ol As New Outlook.Application
Dim olmail As MailItem

Set ol = New Outlook.Application
Set olmail = ol.CreateItem(olMailItem)
With olmail
.To = Range("a1").Value
.Subject = Range("b1").Value
' .Body = ou html body ou autre chose ??? la je bloque
.Display '.ou Send
End With
End sub

j'avais penser passer par "Fichier" "envoyer vers" "destinataire..." qui
utilise directemnt la feuille excel en tant que corps du message mais la
ç'est pire , malgres toutes les recherches je n'ai pas trouver de code qui
permette de le faire en vba . Si vous avez une idee ou quelque chose de
similaire , je suis preneur et je pense ne pas etre le seul .

2 réponses

Avatar
isabelle
bonjour Gus,

For Each c In Selection
x = x & vbNewLine & c
Next
.Body = x

isabelle

j'aimerai coller une plage de cellules d'une feuille excel sur un nouveau
mail mais dans le corps du message , pas en piece jointe.
Manuellemntt c'est faisable et ça marche tres bien en gardant meme la mise
en forme des cellule d'origine...
La question est comment le faire en vba ?
Voici comment je procede :
Private Sub CommandButton5_Click()
Dim ol As New Outlook.Application
Dim olmail As MailItem

Set ol = New Outlook.Application
Set olmail = ol.CreateItem(olMailItem)
With olmail
.To = Range("a1").Value
.Subject = Range("b1").Value
' .Body = ou html body ou autre chose ??? la je bloque
.Display '.ou Send
End With
End sub

j'avais penser passer par "Fichier" "envoyer vers" "destinataire..." qui
utilise directemnt la feuille excel en tant que corps du message mais la
ç'est pire , malgres toutes les recherches je n'ai pas trouver de code qui
permette de le faire en vba . Si vous avez une idee ou quelque chose de
similaire , je suis preneur et je pense ne pas etre le seul .


Avatar
Gus
Merci , je vais essayer de commencer avec ça ...