Please see line 3 and 4 of below code. Although the cell values from cells J16 and I70 are rounded off in the spreadsheet to two decimal places, the values are displayed on the email to many decimal places. I have tried a round formula in the code with no luck. Any suggestion would be much appreciated.
Code
StrBody = "PLEASE DO NOT REPLY TO THIS GMAIL ADDRESS" & vbNewLine & vbNewLine & _
"Please see attached performance report" & vbNewLine & vbNewLine & _
"80% belt error " & ThisWorkbook.Sheets("Drafts").Range("J16") & vbNewLine & _
"Final belt error " & ThisWorkbook.Sheets("Prep").Range("I70") & vbNewLine & vbNewLine & _
"Regards" & vbNewLine & _
"Draft Surveyor" & vbNewLine & _
ThisWorkbook.Sheets("Prep").Range("D79") & vbNewLine & _
ThisWorkbook.Sheets("Prep").Range("E79")