Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Activeworkbook.sendmail
Im trying to use the activeworkbook.sendmail function in a
macro, but am having trying sending to multiple recipients. How do you do this? Also, is there any way in which you can add text to the email rather than just the subject? Many thanks Jamie |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Activeworkbook.sendmail
try this see if it is what you want but you need to add Microsoft Outlook
object library Option Explicit Function SendMail() If MsgBox("Data about to send out! Continue?", vbOKCancel) = 1 Then Dim oOutl As New Outlook.Application Dim oNS As Outlook.NameSpace Dim oMail As Outlook.MailItem Set oNS = oOutl.GetNamespace("MAPI") oNS.Logon "MS Exchange Settings", "login", False, False ' requests user name and password Set oMail = oOutl.CreateItem(olMailItem) On Error Resume Next With oMail .Subject = "mySubject" '.Recipients.Add " .Recipients.Add " .Body = "What I want to say?" .Attachments.Add myPath & "myFile" .Send End With oNS.Logoff Set oNS = Nothing 'Application.Quit acSaveYes Else 'Application.Quit acSaveYes End If End Function "Jamie" wrote in message ... Im trying to use the activeworkbook.sendmail function in a macro, but am having trying sending to multiple recipients. How do you do this? Also, is there any way in which you can add text to the email rather than just the subject? Many thanks Jamie |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Activeworkbook.sendmail
", ")
send mail doesn't support entering text. You can use Automation to do this. See the following sites for detailed information: Ron de Bruin http://www.rondebruin.nl/sendmail.htm http://msdn.microsoft.com/library/en...odc_xlmail.asp Dick Kuselika www.dicks-clicks.com Tim Zych www.rubbershoe.com/olmail.htm -- Regards, Tom Ogilvy "Jamie" wrote in message ... Im trying to use the activeworkbook.sendmail function in a macro, but am having trying sending to multiple recipients. How do you do this? Also, is there any way in which you can add text to the email rather than just the subject? Many thanks Jamie |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
ActiveWorkbook.RefreshAll | Excel Discussion (Misc queries) | |||
Sendmail | Excel Discussion (Misc queries) | |||
Mutiple names in ActiveWorkbook.SendMail Recipients:= | Excel Discussion (Misc queries) | |||
ActiveWorkbook.RefreshAll | Excel Discussion (Misc queries) | |||
ActiveWorkBook | Excel Discussion (Misc queries) |