Send the sheets by mail to different users 1

[nfpk]

Hi!
Is it possible to make a macro which sends the sheets of the workbook to different users by mail.

I make this once a month, I have 20 sheets, each sheet do I copy to a new workbook and send it by mail to a person. I do this operation 20 times, I want a macro which does it all with one click.

I have manged to make a macro which copy the sheets to 20 different new workbooks. But how do I make the macro or program it to send the workbooks as attachements with a mail and get the correct email address to 20 different persons???
nfpk

 

[dumdum]

Try it this way...

On the File menu, point to Send To, and then click Routing Recipient.

To select recipients to route the workbook to, click Address.

In the Type name or select from list box, type a recipient's name, and then click To. After you've entered the last recipient name in the To box, click OK.
You can select a personal distribution list as the recipient. However, all members of the distribution list are considered to be one recipient. To route the workbook to members of a distribution list one after another, route it to the individual members, not to the entire alias.

You can change the order in which recipients will receive the routed workbook by changing the order of recipient names in the list. Select the name of the recipient you want to move up or down in the list, and then click the appropriate arrow.
We are always looking for new members at our computer forums:

http://forums.jlrforum.net

 

[PepeLeMokko]

Add the following to your macro:


'This example sends the active workbook to a single recipient.

ActiveWorkbook.SendMail recipients:="Jean Selva"

 

[KenWright]

You might want to take a look at the excellent sendmail addin that Ron de Bruin (Microsoft Excel MVP) has created, which is freely available for download at the following link:-

http://www.rondebruin.nl/

The Google search addin is excellent too.

Regards
Ken.............

 

[nfpk]

Thanks its just brilliant, it works so nice!!!!

 

[KenWright]

If you downloaded the Google addin by any chance, a new release was posted on his site last night - version 5. It's great, and will put a Google search facility to pull in help from the Newsgroup archives under the help menu in Excel. It's a brilliant little app.

Regards
Ken...............