I think we both struggle from the same reason then
I’ve tried same functionality with vba codes and saw the error mentioned in my previous post.
Below is the code, you can run it within excel vba designer.
Note: Outlook must be left opened during the runtime of this code
Public Sub create_then_save_email()
On Error GoTo lbl_error
Dim OutApp As Outlook.Application
Set OutApp = GetObject(, "Outlook.Application")
Dim email As Outlook.MailItem
Set email = OutApp.CreateItem(0)
email.To = "firstname.lastname@example.org"
email.Subject = "Test Subject"
email.HTMLBody = "Test <b>HTML</b> Body"
'Application.Wait DateAdd("s", 3, Now)
Dim targetFolder As String, targetFile As String
targetFolder = "C:\NewFolder"
targetFile = targetFolder & "\" & "SavedEmail.msg"
MsgBox "E-mail will be saved saved at when you confirm this popup => " & targetFile, vbExclamation
MsgBox "E-mail saved at [" & targetFile & "] please check the location...", vbInformation
If Err <> 0 Then
MsgBox Err.Description, vbCritical