You can have the code create a copy that does not contain
the sheet you don't want to send, then send the copy.
Something like:

Sheets(Array
("SheetName1", "SheetName2", "SheetName3", "SheetName4")).C
opy
Set NewBook = ActiveWorkbook
NewBook.SaveAs Filename:="C:\NewBookName.xls"


-----Original Message-----
I am working on a project that requires me to save the xl
file and then email it. The problem is that I do not want
to save and send the whole file. I just want to save and
email the 1st 4 sheets and not the form that I am using
for the code. Is this possible? Cannot seem to find any
way to do it.
Thanks in advance for your great help.
.