Howdy, Dennis has provided a good link. A few other thoughts with this code, you'll want the active workbook to be saved and you'll want to set the attachment as:
<pre>
Attachment = ActiveWorkbook.FullName</pre>
Also, if you want the message to be saved in your sent folder you'll want to change:
<pre>
MailDoc.SAVEMESSAGEONSEND = SaveIt
to
MailDoc.SAVEMESSAGEONSEND = True</pre>