MrExcel Publishing
Your One Stop for Excel Tips & Solutions

email only certain sheets

Posted by Karen Smith on March 29, 2001 8:23 PM

Application.Dialogs(xlDialogSendMail).Show will email the entire workbook, but is there any way to specify only certain sheets will be emailed?


Posted by Dave Hawley on March 29, 2001 10:02 PM

Hi Karen

Possibly the easiest way is to place another two short line of code in:

ActiveWorkbook.Close SaveChanges:=False

The "Sheets("Sheet1").Copy" will by default copy the named sheet to a New workbook containing the one sheet.

The "ActiveWorkbook.Close SaveChanges:=False" will close the New workbook without saving.


OzGrid Business Applications