Want to quickly attach your Excel workbook into an email message with a single click? You can do this with Excel Macros!

Make sure your Excel has the Developer Tab enabled following this tutorial.

I explain how you can do this below step by step!

What does it do?

Attach your current workbook into an Outlook email message

Copy Source Code:

Sub AttachWorkbookIntoEmailMessage()

Dim OutlookApp As Object
Dim OutlookMail As Object
Set OutlookApp = CreateObject("Outlook.Application")
Set OutlookMail = OutlookApp.CreateItem(0)

'Let us create the email message and display it
'Make sure to change the parameters below
With OutlookMail
.To = "support@myexcelonline.com"
.Subject = "Have a look at this workbook"
.Body = "Hey John, Could you help out on this?"
.Attachments.Add ActiveWorkbook.FullName
End With

Set OutlookMail = Nothing
Set OutlookApp = Nothing

End Sub

Final Result: 

Exercise Workbook:


STEP 1: Go to Developer > Code > Visual Basic


STEP 2: Paste in your code and Select Save.

You can change the following fields – To, Subject and Body depending on your preferences. These are marked in yellow.

Close the window afterwards.


STEP 3: Let us test it out!

Go to Developer > Code > Macros


Make sure your macro is selected. Click Run.


With just one click, your Excel Workbook is now attached to the email message!


How to Attach Current Workbook into an Email Message Using Macros In Excel



101 Macros Book

If you like this Excel tip, please share itEmail this to someone


Pin on Pinterest

Share on Facebook

Tweet about this on Twitter

Share on LinkedIn