Text Mail Body and HTML Body in same email

In the attached, I have a pivot table that I want to include in my email body. I have that part working perfectly.

If I specify an HTML range to include in my email. I lose the text mail body.

It is most likely that I would want to use both: an introductory line or two of text followed by the HTML content.

I suspect that the answer lies in the RangetoHTML Code (which I did not write - I modified it from here: https://www.exceldemy.com/excel-vba-...to-email-body/). I tired "prepending" the text to the HTML code like this:

Please Login or Register  to view this content.

But that did not seem to work

Your Mailer function is the problem. It is designed to accept a text body, and optionally a Range that will be converted to an HTML body. But if you give it a text body and set .body then also set .HTMLbody, .HTMLbody wipes out the text body.

I have modified this function to be more robust, and your other code does not need to change.

It now checks to see if an HTML range has been passed and if so, includes the text body as the first part of the HTML body.

I have also changed the name of the argument HTMLBody to HTMLRange, since it is not an HTML body. I have also given it a default value of Nothing, since it's a Range.

OK, that definitely does seem to work. Thanks mucho. Now I can have fun taking it apart to see how you did it .

I see what you did. The declaration and assignment to Nothing makes sense.

OK, I just made my "Swiss Army Knife Mailer" a bit more flexible.