Discussion :

[manutazounet]

Bonjour,

Je n'arrive pas a intégrer mon tableau dans un email outlook en vba. J'ai créer une macro mais cela me donne juste "-1" dans le corps du mail.
Le code :

Sub Macro1()

'envoi email'

Dim OutlookApp As Object
Dim OutlookMail As Object
Dim EmailSubject As String
Dim EmailBody As String
Dim EmailTo As String
Dim EmailCC As String
Dim MaFeuille As Worksheet

Set MaFeuille = ThisWorkbook.Sheets("test")

Set OutlookApp = CreateObject("Outlook.Application")

Set OutlookMail = OutlookApp.CreateItem(0)

EmailSubject = "email test"
EmailBody = MaFeuille.Range("b3:d9").Select
EmailTo = MaFeuille.Range("n4").Value
EmailCC = MaFeuille.Range("n5").Value

With OutlookMail
.Subject = EmailSubject
.Body = EmailBody
.To = EmailTo ' Adresse e-mail du destinataire
.CC = EmailCC ' Adresse e-mail en copie
.Display

End With
' Libérer les objets
Set OutlookMail = Nothing
Set OutlookApp = Nothing

End Sub

Je n'arrive à comprendre pourquoi cela ne fonctionne pas.

Merci pour votre aide

[tototiti2008]

Bonjour,

Excel fait des fichiers xlsx, Outlook fait des emails au format HTML
Il faudrait convertir les données de ta feuille au format HTML pou envisager qu'outlook puisse comprendre ce que tu veux faire

Des pistes par là :
https://excel.developpez.com/faq/?pa...geCellulesMail

[Guy7700]

Bonjour,

L'objectif est de coller le tableau dans le corps du courriel ou de l'envoyer en tant que pièce jointe ?

[Philippe Tulliez]

Bonjour,

Je n'arrive à comprendre pourquoi cela ne fonctionne pas.

Il y a en effet peu de chance que cela fonctionne. Vous n'utilisez nulle part de copie de la plage. Vous faites juste une sélection à l'aide la méthode Select

Personnellement, j'opte pour la ou les pièces jointes
Soit la ligne .Attachments.Add f où f est une variable de type String contenant le nom complet du fichier à joindre (Chemin + Nom et suffixe du fichier)

• Attachments est une propriété de l’objet Outlook.MailItem.
  Elle renvoie la collection Attachments représentant toutes les pièces jointes du message.
• Add est une méthode de cette collection.
  Elle ajoute un nouvel objet Attachment à la collection, donc au message.

[manutazounet]

Oui il s'agissait de copier le tableau dans le corps du mail. J'ai trouvé mon erreur. Merci à tous