macro to send excel sheet to specific email address

Hi

I have added a button to my spreadsheet that allows users to add the sheet
to an email ready to send, but i really want it to populate the email address
so it sends it straight to me rather than having to rely on users to input my
address (they are a bit slow I'm afraid!!!)

Thanks

John

John, have a look at some of Ron de Bruin's code here to do it

http://www.rondebruin.nl/sendmail.htm#Workbook.

--
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 & 2003

"JonnieP" <[email protected]> wrote in message
news:[email protected]...
> Hi
>
> I have added a button to my spreadsheet that allows users to add the sheet
> to an email ready to send, but i really want it to populate the email
address
> so it sends it straight to me rather than having to rely on users to input
my
> address (they are a bit slow I'm afraid!!!)
>
> Thanks
>
> John

This code was in the Help files in Excel VBA. I substituted my own
email address(complete with the @..... inside the parentheses). I got
a warning message that a program was trying to access my email and did
I want to proceed. It worked.


With ThisWorkbook
.HasRoutingSlip = True
With .RoutingSlip
.Delivery = xlOneAfterAnother
.Recipients = Array("Adam Bendel", _
"Jean Selva", "Bernard Gabor")
.Subject = "Here is the workbook"
.Message = "Here is the workbook. What do you think?"
.ReturnWhenDone = True
End With
.Route
End With


--
DataCollector
------------------------------------------------------------------------
DataCollector's Profile: http://www.hightechtalks.com/m368
View this thread: http://www.hightechtalks.com/t2295465