Excel Macro - Send Email from Worksheet

[mark.k.conroy]

Hello!

I'm hoping for some help. I'm trying to send a worksheet through a macro. i have a cell in the sheet with the staff member's email address and I'd like to click the macro button and have just page 1 of the current tab attached to an outlook email and have the to line filled in based on the cell that the address is located in. Subject and body can remain blank.

This is an attendance tracker that each supervisor can share at their discretion so this button will greatly help streamline the process. I have a very basic macro already created that creates an email but it still doesn't auto populate the address. Any help would be GREATLY appreciated. Macros are WAY over my head. I have the current version of this sheet attached.

All the best,
Mark

[davesexcel]

Check it out.

http://www.rondebruin.nl/win/s1/outlook/amail2.htm

[mark.k.conroy]

That's NEARLY perfect - but I don't want to have to go in to EVERY sheet to change the email address - I want the macro to read it from a cell on the sheet. Basically when I push this out to all supervisors in my agency I don't want to have to PHYSICALLY walk them through every tab for their employees and hunt through code to change the email address OR rely on them to do it which will likely result in messed up code.

[humdingaling]

http://www.rondebruin.nl/win/s1/outlook/amail5.htm

replace

Please Login or Register  to view this content.

with

Please Login or Register  to view this content.

ps
also change

.Send to .Display

while you are testing otherwise every time you test it ...it will actually send out actual emails

[mark.k.conroy]

Tried that - it turned my "to" line red and won't run correctly. It displays as .To = "sh.Range("c3").Value" but in red font. newest version is attached...I'm at a loss because I'm just not familiar with this...any thoughts?

[Anisusa]

Try this if it works for you :

Please Login or Register  to view this content.

[humdingaling]

A. you didnt use the code in the link i pasted but keep your original one that Dave suggested instead
Dave's version does not loop thru the workbook to go thru every sheet like you requested in post #3

B. you put code as

Please Login or Register  to view this content.

instead of

Please Login or Register  to view this content.

note the extra " you put in
it changes it from the value of C3 to exactly "sh.Range("c3").Value" which is an invalid email address

see below updated code with some of your customisations

Please Login or Register  to view this content.