Pasting Range of Cells into Outlook with Other Text in Body?

[bryanmarks]

Hello! I am still looking for help with this code!

I've searched for how to do this, including on Ron De Bruin's website, and have yet to see how you can copy a range of cells in Excel from a file into the body of an email that already has text plus attach a separate file to the email. I'm sure it's doable, but I'm way too new at all of this to figure out the correct code to use.

The cells that need to be copied will always be in a file named SPSS CHECK--Daily ER Production Aggr by Region Type & ER.xlsx in columns A-K, but the number of rows in that range will vary by day. I've identified where I'd want these cells to be pasted in the code below, but with no attempt at coming up with the code for that.

BTW, is there a way to add a hard space at the end of sentences so that two spaces always appear between the end of one sentence and the beginning of another, or is that an Outlook quirk that strips out extra spaces and reformats the text?

Here is my code so far:

Please Login or Register  to view this content.

[Tinbendr]

You have to generate a HTML string using Ron's function and 'build' a final string to assign to .HTMLBody.

Please Login or Register  to view this content.

[bryanmarks]

Hi, David,

Thanks for the suggestion! It got me much closer to where I wanted to be, but still needed a lot of additional code to do what I wanted. This included adding the Function RangetoHTML(rng As Range) code from Ron de Bruin's page, without which the code will never run. At first, I thought I wanted a block of cells that would be in another file to be copied and pasted into the email, then realized that could make a very long email, so I created a macro ("FindGrandTotal") to only pull the information on the Grand Total line plus the approprite column headers.

Here is what I ended up using. I'm hoping someone else out there will find it of some use. I'm picking it up where the

Please Login or Register  to view this content.

is created. The Function RangetoHTML(rng As Range) code is shown below that.

Please Login or Register  to view this content.

Please Login or Register  to view this content.