Set OL = CreateObject("Outlook.Application")
Set emlMessage = Outlook.CreateItem(olMailItem)
emlMessage.Attachments.Add "filename"
emlMessage.Subject = "title"
'emlMessage.To = "whoever"
emlMessage.Display

You'll need the outlook reference added via toolsreference in the vb
editor.


------------------------------------------------
~~ Message posted from http://www.ExcelTip.com/
~~View and post usenet messages directly from http://www.ExcelForum.com/

~~Now Available: Financial Statements.xls, a step by step guide to creating financial statements