Macro Excel Envoyer mail

Résolu
Bonjour,

Je voudrai créer, si c'est possible, une macro sur Excel, capable d'envoyer une feuille d'un classeur dans le corps du message (sur out look).

Pouvez vous me conseiller merci d'avance.
Configuration: Windows XP
Internet Explorer 6.0

2 réponses

  • Votes
  • Date
  • Date décroissante
  1. Bonjour,
    Si c'est ponctuel, le plus simple est de faire un copier-coller.
    Sinon tu peux toujours envoyer ton tableau en pièce jointe.

    A+

    pepe35
    1. Bonjour

      Voici une macro

      Sub EnvoiUnMail()
      Dim MailAd As String
      Dim Msg As Range
      Dim Maplage As Range
      Dim Subj As String
      Dim URLto As String
      MailAd = "adressedestinataire@free.fr"
      Subj = "Envoi d'une sélection"
      Set Maplage = Application.InputBox(Prompt:="Sélectionnez la plage à imprimer", Title:="Imprimer", Type:=8)
      Maplage.Copy

      URLto = "mailto:" & MailAd & "?subject=" & Subj & "&body=" & "Une fois sur le corps d'Outlook faites coller"
      ActiveWorkbook.FollowHyperlink Address:=URLto
      End Sub