I would like to be able to send a single sheet (not whole workbook) as the body (not attachment) of an Outlook mail. This is the best I can do but it only attaches the sheet to the mail:

Code:
Worksheets("Redemptions").Select
ActiveSheet.Copy
Application.Dialogs(xlDialogSendMail).Show "[email protected]", "My Subject"
I would be grateful for any ideas