Bonjour,
J'ai le code suivant intégré dans une macro, et je ne souhaite pas joindre de fichier-joint. Comment faire? Merci.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
 
    Dim ol As New Outlook.Application
    Dim olmail As MailItem
    Set ol = New Outlook.Application
    Set olmail = ol.CreateItem(olMailItem)
    With olmail
      .To = "toto@toto.fr"
      .Subject = "Test"
      .Body = "Hello"
      .Attachments.Add ThisWorkbook.Path & "\" & ThisWorkbook.Name
      '.Display
    End With