| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Sendin email with Excel macros
Hi, I use this code to send multiple email, but I get a "run time error
438" with .From field, as if it isn't supported. Does anyone known the solution? Set OutApp = CreateObject("Outlook.Application") Set OutMail = OutApp.CreateItem(olMailItem) With OutMail .From = " .To = IndirizzoEmail .Subject = Oggetto .Body = TestoEmail .OriginatorDeliveryReportRequested = False .Display End With Set OutMail = Nothing |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Sendin email with Excel macros
Do you need to have a From line as I think it populates it with the
default user anyway. Don't forget to set your OutApp = nothing at the end also. FunkySquid Maurizio wrote: Hi, I use this code to send multiple email, but I get a "run time error 438" with .From field, as if it isn't supported. Does anyone known the solution? Set OutApp = CreateObject("Outlook.Application") Set OutMail = OutApp.CreateItem(olMailItem) With OutMail .From = " .To = IndirizzoEmail .Subject = Oggetto .Body = TestoEmail .OriginatorDeliveryReportRequested = False .Display End With Set OutMail = Nothing |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Sendin email with Excel macros
Not possible with Outlook
With CDO you can do it http://www.rondebruin.nl/cdo.htm -- Regards Ron de Bruin http://www.rondebruin.nl "Maurizio" wrote in message ps.com... Hi, I use this code to send multiple email, but I get a "run time error 438" with .From field, as if it isn't supported. Does anyone known the solution? Set OutApp = CreateObject("Outlook.Application") Set OutMail = OutApp.CreateItem(olMailItem) With OutMail .From = " .To = IndirizzoEmail .Subject = Oggetto .Body = TestoEmail .OriginatorDeliveryReportRequested = False .Display End With Set OutMail = Nothing |
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Sendin email with Excel macros
I've used:
..SentOnBehalfOfName = " It works!!!!! Regard Maurizio Ron de Bruin ha scritto: Not possible with Outlook With CDO you can do it http://www.rondebruin.nl/cdo.htm -- Regards Ron de Bruin http://www.rondebruin.nl "Maurizio" wrote in message ps.com... Hi, I use this code to send multiple email, but I get a "run time error 438" with .From field, as if it isn't supported. Does anyone known the solution? Set OutApp = CreateObject("Outlook.Application") Set OutMail = OutApp.CreateItem(olMailItem) With OutMail .From = " .To = IndirizzoEmail .Subject = Oggetto .Body = TestoEmail .OriginatorDeliveryReportRequested = False .Display End With Set OutMail = Nothing |
|
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Sendin email with Excel macros
Hi Maurizio
You are correct -- Regards Ron de Bruin http://www.rondebruin.nl "Maurizio" wrote in message ups.com... I've used: .SentOnBehalfOfName = " It works!!!!! Regard Maurizio Ron de Bruin ha scritto: Not possible with Outlook With CDO you can do it http://www.rondebruin.nl/cdo.htm -- Regards Ron de Bruin http://www.rondebruin.nl "Maurizio" wrote in message ps.com... Hi, I use this code to send multiple email, but I get a "run time error 438" with .From field, as if it isn't supported. Does anyone known the solution? Set OutApp = CreateObject("Outlook.Application") Set OutMail = OutApp.CreateItem(olMailItem) With OutMail .From = " .To = IndirizzoEmail .Subject = Oggetto .Body = TestoEmail .OriginatorDeliveryReportRequested = False .Display End With Set OutMail = Nothing |
|
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Sendin email with Excel macros
Some more that I not use myself
SentOnBehalfOfName SenderName ReceivedByName ReceivedOnBehalfOfName ReplyRecipientNames SenderEmailAddress -- Regards Ron de Bruin http://www.rondebruin.nl "Ron de Bruin" wrote in message ... Hi Maurizio You are correct -- Regards Ron de Bruin http://www.rondebruin.nl "Maurizio" wrote in message ups.com... I've used: .SentOnBehalfOfName = " It works!!!!! Regard Maurizio Ron de Bruin ha scritto: Not possible with Outlook With CDO you can do it http://www.rondebruin.nl/cdo.htm -- Regards Ron de Bruin http://www.rondebruin.nl "Maurizio" wrote in message ps.com... Hi, I use this code to send multiple email, but I get a "run time error 438" with .From field, as if it isn't supported. Does anyone known the solution? Set OutApp = CreateObject("Outlook.Application") Set OutMail = OutApp.CreateItem(olMailItem) With OutMail .From = " .To = IndirizzoEmail .Subject = Oggetto .Body = TestoEmail .OriginatorDeliveryReportRequested = False .Display End With Set OutMail = Nothing |
|
#7
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Sendin email with Excel macros
Another tip
'Change Sender name and reply address 'The receiver can see the original mail address in the properties if he want .SentOnBehalfOfName = """SenderName"" " -- Regards Ron de Bruin http://www.rondebruin.nl "Ron de Bruin" wrote in message ... Hi Maurizio You are correct -- Regards Ron de Bruin http://www.rondebruin.nl "Maurizio" wrote in message ups.com... I've used: .SentOnBehalfOfName = " It works!!!!! Regard Maurizio Ron de Bruin ha scritto: Not possible with Outlook With CDO you can do it http://www.rondebruin.nl/cdo.htm -- Regards Ron de Bruin http://www.rondebruin.nl "Maurizio" wrote in message ps.com... Hi, I use this code to send multiple email, but I get a "run time error 438" with .From field, as if it isn't supported. Does anyone known the solution? Set OutApp = CreateObject("Outlook.Application") Set OutMail = OutApp.CreateItem(olMailItem) With OutMail .From = " .To = IndirizzoEmail .Subject = Oggetto .Body = TestoEmail .OriginatorDeliveryReportRequested = False .Display End With Set OutMail = Nothing |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| email without macros | Excel Discussion (Misc queries) | |||
| Macros - Converting Excel spreadheet to Outlook email | Excel Discussion (Misc queries) | |||
| Excel and Outlook Email Macros | Excel Programming | |||
| How do I send/email macros from my excel workbook to someone else? | Excel Worksheet Functions | |||
| Email templates & Excel Macros | Excel Programming | |||
![Maurizio[_2_] is offline](https://www.excelbanter.com/images/SultanThemeVB3R/statusicon/user_offline.gif)
Hybrid Mode
