I have written code to email and attach a sheet, which works perfectly, except part of the email body per the code below is not being extracted
strBody = strBody + "Attached please find Sales for the period _
" + Sheets("Report Name").Range("B8").Text + Sheets("Report...