Доброго дня Вам  
Есть макрос для отправки листа по имейлу  
Sub SendSheet()  
ThisWorkbook.Sheets("send").Copy  
With ActiveWorkbook  
.SendMail Recipients:="NS@PAX.EU", _  
Subject:="PAY"  
.Close SaveChanges:=False  
End With  
End Sub  
1.В лист вся инфо вытягивается при помочи формул,что необходино добавит в макрос,чтоб в отправленном листе этих формул небыло видно,что то вроде paste special values или можно отправит как картинку  
2.И можно ли сюда что то добавит чтоб отсылаевому фаилу присваивалос имя тои книги откуда етот лист берется