L0ndonbound
New Member
- Joined
- Feb 16, 2017
- Messages
- 15
Hi,
I am trying to embed several pictures (they need to be pictures - not based upon the links to the pictures as they are to be emailed to external parties that do not have access to my hard drive) and the following code is displaying the first chart correctly but subsequent ones 2,3,4 etc are showing as the little square with an x in it. What change to my code below do I need to make?
Thanks for advice.
I am trying to embed several pictures (they need to be pictures - not based upon the links to the pictures as they are to be emailed to external parties that do not have access to my hard drive) and the following code is displaying the first chart correctly but subsequent ones 2,3,4 etc are showing as the little square with an x in it. What change to my code below do I need to make?
Thanks for advice.
Code:
Sub macro1
Dim olMail As Outlook.MailItem
Dim olapp As Outlook.Application
Dim wEditor As Word.Document
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set olapp = CreateObject("Outlook.Application")
Set olMail = olapp.CreateItem(0)
olMail.Display
Set wEditor = olapp.ActiveInspector.WordEditor
With olMail
.To = "abs@xyz.com"
olMail.Subject = "xyz"
.HTMLBody = .HTMLBody & "\\local\chart1.png"_
"\\local\chart2.png" _
"\\local\chart3.png"
.Display
End sub
Last edited: