melson titular
New Member
- Joined
- Oct 3, 2013
- Messages
- 43
HI Guys,
My code below is creating a message in Outlook using excel macro.
The problem is that the formatting of the letter is breaking down once i run this code.
I'm not sure what the proper syntax to use. Hope you could help me out on this guys. Thank you.
Sub EmailHelper()
Dim olApp As Outlook.Application
Dim olEmail As Outlook.MailItem
Set olApp = New Outlook.Application
Set olEmail = olApp.CreateItem(olMailItem)
With olEmail
.BodyFormat = olFormatHTML
.HTMLBody = Sheets("SQ1").txtBody1
.display
End With
End Sub
My code below is creating a message in Outlook using excel macro.
The problem is that the formatting of the letter is breaking down once i run this code.
I'm not sure what the proper syntax to use. Hope you could help me out on this guys. Thank you.
Sub EmailHelper()
Dim olApp As Outlook.Application
Dim olEmail As Outlook.MailItem
Set olApp = New Outlook.Application
Set olEmail = olApp.CreateItem(olMailItem)
With olEmail
.BodyFormat = olFormatHTML
.HTMLBody = Sheets("SQ1").txtBody1
.display
End With
End Sub