Sub Mail_workbook()

ActiveWorkbook.SendMail "[email protected]", _

"This is the Subject line"

End Sub

Nếu bạn muốn gửi sổ làm việc qua thư nơi mã được đặt, bạn phải sử dụng dòng sau:

ThisWorkbook.SendMail "[email protected]", _

Lưu ý: Nó không phải là sổ làm việc đang hoạt động được sử dụng tại thời điểm đó.