I am trying to draft mail via outlook using VBA.
since we need to add outlook library/ scripting library (for using file system object), I incorporated vba code to add libraries.
Code is working fine if the it only have the lines to add library. In this case it is adding the required library.
But when i add outlook object declaration to the code, it is skipping the code lines which adds libraries and throwing 'compiler error : user defined type not defined'
If the libraries are already added this is running fine. In any case it is skipping the lines highlighted in red.
On Error Resume Next
Application.VBE.ActiveVBProject.References.AddFromFile "C:\Program Files\Microsoft Office\root\Office16\MSOUTL.OLB" ' adding outlook library
On Error GoTo 0
Dim MyOutlook As Outlook.Application
Dim DraftMail As Outlook.MailItem
Set MyOutlook = New Outlook.Application
Set DraftMail = MyOutlook.CreateItem(olMailItem)
.BodyFormat = olFormatHTML
.HTMLBody = "Dear ABC" & vbNewLine & .HTMLBody
.To = "[email protected]"
.Subject = "xyz"