This code works for me:
Sub Mailit()
Dim BkName As String
ActiveWorkbook.Save
BkName = ActiveWorkbook.FullName
Dim Mailit As Object
Set Mailit = CreateObject("Outlook.Application")
Set NewMail = Mailit.CreateItem(olMailItem)
NewMail.Subject = ActiveWorkbook.Name
NewMail.Attachments.Add BkName
NewMail.Display
End Sub

Attach it to your button. If you want it available for any workbook, put the
module in your personal workbook. Also, be sure the reference to Microsoft
Visual Basic for Applications Extensibility (etc.) is checked under
Tools/Refereces in the VBE



"pmud" wrote in message ...
Hi,

I have never used macros before..but i have created a button on excel
sheet...a CommandButton1 . Now when this button is clicked a blank e - mail
should open up with this spreadsheet attached to it...

Is there any way this is possible? What code is required for this?

Thanks

--
pmud