Good Morning, (Excel 2010)
I have a piece of code I have been using for awhile, which opens my email, ARG1 enters the email addresses in the To: field, ARG2 enters the word "Test" in the Subject line. If someone could help me figure out how to add a message to the body of the email as well as attach a few copies of tabs on the same workbook named "Intake", "D11533", and "Approval", It would be greatly appreciated.
Thank You
Sub Email_Capital_Purchase_Template()
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
Application.Dialogs(xlDialogSendMail).Show arg1:="Lisa.Smith@xxxx.org; Pat.Jones@xxxx.org", arg2:="Test"
End Sub
I have a piece of code I have been using for awhile, which opens my email, ARG1 enters the email addresses in the To: field, ARG2 enters the word "Test" in the Subject line. If someone could help me figure out how to add a message to the body of the email as well as attach a few copies of tabs on the same workbook named "Intake", "D11533", and "Approval", It would be greatly appreciated.
Thank You
Sub Email_Capital_Purchase_Template()
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
Application.Dialogs(xlDialogSendMail).Show arg1:="Lisa.Smith@xxxx.org; Pat.Jones@xxxx.org", arg2:="Test"
End Sub