How To Insert/Embed Outlook Email into excel worksheet using VBA

Hi Folks,

I would need your help to insert the outlook email message(saved in the same path as of my macro file) into the excel worksheet.

I tried recording the macro and altering the code with a dynamic path and it ended up with the runtime error -> " xxx(output email name).msg:: File format invalid".

My VBA code:

Please Login or Register  to view this content.

Please help out!


Thanks

You have multiple problems on this line of code:

Please Login or Register  to view this content.

What is the data type of Email? On this line you are trying to use it as an object but in later you are trying to use it as a String.

In any case, you are trying to open an Outlook email as if it were an Excel file, and that just won't work. That is why you are getting the error.

I would try this. I have not tested it.

Please Login or Register  to view this content.

Originally Posted by Keers1

I have used Email -> to assign the email name (as a reference) using a set keyword, similar to a worksheet reference say eg: set wk = XPath & "\temp.xlsx".

This is incorrect. The Set keyword is used to cause an object variable to reference the same object on the other side of the "=" sign. For example:

Please Login or Register  to view this content.

You cannot use the Set keyword to assign a String to a Worksheet object or any other object.