| Home |
| Search |
| Today's Posts |
|
#8
Posted to microsoft.public.excel.programming
|
|||
|
|||
"Sendmail" macro to multilpe addresses
You are welcome! Thanks for the feedback!
Stefi Stephen C ezt *rta: Thank you Stefi. "Stefi" wrote: Separate addresses in A1 by, say commas, insert this line addressees = Split(Range("A1"), ",") before With wb line and use .SendMail addressees, "This is the Subject line" Regards, Stefi Stephen C ezt *rta: I have found some code on Ron de Bruin's web site which enables me to send the active sheet as an attachment to an email address contained in cell A1. This works fine but I now require it to be sent to more than one person, if add a second email address to cell A1 the macro will not work. Could someone please advise me how to change the following code to enable me to send to multiple recipients contained in one cell. Dim wb As Workbook Dim strdate As String strdate = Format(Now, "dd-mm-yy h-mm-ss") Application.ScreenUpdating = False ActiveSheet.Copy Set wb = ActiveWorkbook With wb .SaveAs "Part of " & ThisWorkbook.Name _ & " " & strdate & ".xls" .SendMail (Range("a1")), _ "This is the Subject line" .ChangeFileAccess xlReadOnly Kill .FullName .Close False End With Application.ScreenUpdating = True End Sub I am using excel 2000 & Outlook Express. |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| "Send Email" macro to multiple addresses | Excel Programming | |||
| Excel - Golf - how to display "-2" as "2 Under" or "4"as "+4" or "4 Over" in a calculation cell | Excel Discussion (Misc queries) | |||
| Read ".dll" files, the Macro "work flow" and the actual values of the variables when Macro is running | Excel Programming | |||
| Excel Macro to email to addresses in "Contacts" Tab | Excel Programming | |||
| Macro to concatenate into "B1" B2 thru B"x" based on new data in "Col A" | Excel Discussion (Misc queries) | |||
Threaded Mode
