Printing an Excel Worksheet

[KarMac21]

Can anyone please tell me how I can automate emailing a single Excel worksheet instead of having to email the entire workbook. I want it to do the exact samething it does when you go to FILE..SEND TO..MAIL Recipient and the pick single sheet.

Any help would be greatly appreciated.

Thanks - Mac

 

[acron]

Try the following , it copies the active sheet to a new workbook and sends it. You can include code to close it when finished, or save it

    Sub MailSheet()
        ActiveSheet.Copy
        ActiveWorkbook.SendMail _
            Recipients:="somebody@somewhere.com", _
            Subject:="Update"
    End Sub

AC