software

Each day I take attendance for my group here at work. Is there a way
to create a macro that would emulate me hitting quot;File, Send To, Mail
Recipient, and enter the word quot;Attendancequot; (my distribution list) in
the TO: column.This will create the email and attachment but you have to have saved the file
to do this (be interested to know how to do it with an open document). Make
sure you have M/soft Outlook Object Library ticked in Tools, References:

Sub myEmail()
Dim myOut As New Outlook.Application
Dim myItem As Outlook.MailItem
Set myItem = myOut.CreateItem(olMailItem)
myItem.Recipients.Add quot;Attendancequot;
' myItem.Subject = ...
myItem.Attachments.Add quot;c:\test.xlsquot;
myItem.Display
End Subquot;ChuckFquot; wrote:

gt; Each day I take attendance for my group here at work. Is there a way
gt; to create a macro that would emulate me hitting quot;File, Send To, Mail
gt; Recipient, and enter the word quot;Attendancequot; (my distribution list) in
gt; the TO: column.
gt;
gt;

In addition to Martin's code you may also want to have a look here for more
information on e-mailing from excel

www.rondebruin.nl/sendmail.htm#Tips
--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 amp; 2003

quot;ChuckFquot; gt; wrote in message oups.com...
gt; Each day I take attendance for my group here at work. Is there a way
gt; to create a macro that would emulate me hitting quot;File, Send To, Mail
gt; Recipient, and enter the word quot;Attendancequot; (my distribution list) in
gt; the TO: column.
gt;