Sending a worksheet through email by VBA

[getshorty]

Hello,

I have the following piece of code that copies the active excel sheet in a workbook and saves it to a temporary file in preparation for it being sent via email. I need to modify the code to select a named sheet instead of the active sheet. Would appreciate a few pointers.

ActiveSheet.Copy
Set WB = ActiveWorkbook
FileName = Range("Subject") & " Text.xls"
On Error Resume Next
Kill "C:\" & FileName
On Error Goto 0
WB.SaveAs FileName:="C:\" & FileName

cheers