ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Late binding issue with Outlook mail item from XL (https://www.excelbanter.com/excel-programming/409126-late-binding-issue-outlook-mail-item-xl.html)

XP

Late binding issue with Outlook mail item from XL
 
I'm trying to automate Outlook from XL to generate an email using LATE
BINDING. I have the following code so far, BUT it breaks when trying to
create a MailItem:

Dim oOL As Object
Dim oMAIL As Object
Set oOL = CreateObject("Outlook.Application")
Set oMAIL = oOL.CreateObject("Outlook.MailItem")

Can someone please correct my code so this will run correctly?

Thanks much in advance.

papou[_4_]

Late binding issue with Outlook mail item from XL
 
Hi
Dim oOL As Object
Dim oMAIL As Object
Set oOL = CreateObject("Outlook.Application")
Set oMAIL = oOL.CreateItem(olMailItem)

HTH
Cordially
Pascal


"XP" a écrit dans le message de news:
...
I'm trying to automate Outlook from XL to generate an email using LATE
BINDING. I have the following code so far, BUT it breaks when trying to
create a MailItem:

Dim oOL As Object
Dim oMAIL As Object
Set oOL = CreateObject("Outlook.Application")
Set oMAIL = oOL.CreateObject("Outlook.MailItem")

Can someone please correct my code so this will run correctly?

Thanks much in advance.




XP

Late binding issue with Outlook mail item from XL
 
Thanks, but this method fails at the line:

Set oMAIL = oOL.CreateItem(olMailItem)

Any ideas?

"papou" wrote:

Hi
Dim oOL As Object
Dim oMAIL As Object
Set oOL = CreateObject("Outlook.Application")
Set oMAIL = oOL.CreateItem(olMailItem)

HTH
Cordially
Pascal


"XP" a écrit dans le message de news:
...
I'm trying to automate Outlook from XL to generate an email using LATE
BINDING. I have the following code so far, BUT it breaks when trying to
create a MailItem:

Dim oOL As Object
Dim oMAIL As Object
Set oOL = CreateObject("Outlook.Application")
Set oMAIL = oOL.CreateObject("Outlook.MailItem")

Can someone please correct my code so this will run correctly?

Thanks much in advance.





Dave Peterson

Late binding issue with Outlook mail item from XL
 
Open up Outlook.
Go to its VBE
Show the immediate window
and type:
?olMailItem

You'll see a number returned. Use that number instead of olMailItem.

You'll want to do this for any other outlook constant that you use in your code.

(and you'll have 0 errors <vbg.)
That was a hint.

XP wrote:

Thanks, but this method fails at the line:

Set oMAIL = oOL.CreateItem(olMailItem)

Any ideas?

"papou" wrote:

Hi
Dim oOL As Object
Dim oMAIL As Object
Set oOL = CreateObject("Outlook.Application")
Set oMAIL = oOL.CreateItem(olMailItem)

HTH
Cordially
Pascal


"XP" a écrit dans le message de news:
...
I'm trying to automate Outlook from XL to generate an email using LATE
BINDING. I have the following code so far, BUT it breaks when trying to
create a MailItem:

Dim oOL As Object
Dim oMAIL As Object
Set oOL = CreateObject("Outlook.Application")
Set oMAIL = oOL.CreateObject("Outlook.MailItem")

Can someone please correct my code so this will run correctly?

Thanks much in advance.





--

Dave Peterson

papou[_4_]

Late binding issue with Outlook mail item from XL
 
Hi
Yes sorry about that:
Set oMAIL = oOL.CreateItem(0)

Cordially
Pascal

"XP" a écrit dans le message de news:
...
Thanks, but this method fails at the line:

Set oMAIL = oOL.CreateItem(olMailItem)

Any ideas?

"papou" wrote:

Hi
Dim oOL As Object
Dim oMAIL As Object
Set oOL = CreateObject("Outlook.Application")
Set oMAIL = oOL.CreateItem(olMailItem)

HTH
Cordially
Pascal


"XP" a écrit dans le message de news:
...
I'm trying to automate Outlook from XL to generate an email using LATE
BINDING. I have the following code so far, BUT it breaks when trying to
create a MailItem:

Dim oOL As Object
Dim oMAIL As Object
Set oOL = CreateObject("Outlook.Application")
Set oMAIL = oOL.CreateObject("Outlook.MailItem")

Can someone please correct my code so this will run correctly?

Thanks much in advance.







Ron de Bruin

Late binding issue with Outlook mail item from XL
 
See the examples in my Outlook macro's
http://www.rondebruin.nl/sendmail.htm

--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"XP" wrote in message ...
I'm trying to automate Outlook from XL to generate an email using LATE
BINDING. I have the following code so far, BUT it breaks when trying to
create a MailItem:

Dim oOL As Object
Dim oMAIL As Object
Set oOL = CreateObject("Outlook.Application")
Set oMAIL = oOL.CreateObject("Outlook.MailItem")

Can someone please correct my code so this will run correctly?

Thanks much in advance.



All times are GMT +1. The time now is 07:18 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com