Sendobject In Excel

[JARE]

I was wondering if there is a simple way to Automate sending a spreadsheet via email to someone in Excel
In Access I use Docmd.SendObject.

Thanks

 

[JARE]

I did try recording a macro and using the SendTo - Mail recipient Command, Which generated this code:

Application.Dialogs(xlDialogSendMail).Show

But Unlike Access SendObject there is no where for Subject,
Body text, TO: , And CC:

Is there an easy way to do this in code? I'm pretty new to
the excel Object Set.

 

[JARE]

Oh, and the mail client is Exchange, using Exchange Server

 

[JARE]

I checked the help file for Excel VB a little better and
found this:

Application.Dialogs(xlDialogSendMail).Show arg1:="Test@test.com", arg2:="Subject Here"

Is there a better method to use?

 

[JARE]

The only drawback is the process won't be completly
automated. it only brings up the exchange dilog box
and fills in sender + subject + attaches open worksheet
It doesn't actually send the message. Still looking for a
better way