Sub Mail_workbook()
    ActiveWorkbook.SendMail "ron@debruin.nl", _
                            "This is the Subject line"
End Sub
 

ThisWorkbook.SendMail "ron@debruin.nl", _ 

• Create User Forms in Microsoft Excel
• Using Loops in VBA in Microsoft Excel
• The Best Shortcut Keys in Microsoft Excel
• Writing Your First VBA Function in Excel
• Add Combo Box to a Sheet in Microsoft Excel
• Formulas to calculate Loan payments in Microsoft Excel
• Array variables using VBA in Microsoft Excel
• Create an Amortization Schedule in Microsoft Excel
• Find duplicates items in combine columns in Microsoft Excel
• Vlookup Formula – Organizing the Data Table