Question about OLE, Word, Outlook and macros

[driessen]

Hello,

I have often used OLE and Word in my application, sending commands to run macro's in Word, which works very well.

Code: Select all  Expand view

oWord := TOleAuto():New("Word Application")
.....
oWord:Run("Macro")
 

Now, I try to use the same syntax to run a macro in Outlook.

Code: Select all  Expand view

oOutLook   := CreateObject("Outlook.Application")
oNameSpace := oOutlook:GetNameSpace("MAPI")
...
oOutlook:Run("Macro")
 

Unfortunately, this always returns an error "Error Outlook Application/0 S_OK: Run".

What is the exact syntax to use macros for Outlook in FWH ?

Thanks a lot in advance for any help.

[lailton.webmaster]

Try:

oWord:Run:Macro()

or

oWord:Macro()

[driessen]

Thanks for your answer, but unfortunately the same error occurs.

I tried the different possibilities :

oOutlook:Run:Macro("Macro")
oOutlook:Run("Macro")
oMail:Run:Macro("Macro")
oMail:Run("Macro")

Any idea ?

[lailton.webmaster]

I will try use and return with my result.

[lailton.webmaster]

You need use:

oWordObject:Run( NameOfMacro )

later of NameOfMacro you can use too 30 vars, EXemplo oWordObject:Run( NameOfMacro, var1, var2, var3 ........... var30)

Only if you need of course

[driessen]

Thanks a lot for trying to help me.

Your example works here too .... for Word.

The problem is that it doesn't work for Outlook.

But thanks anyway.

[lailton.webmaster]

Driessen

I not found nothing inside of "MSOUTL.OLB" about Macro, and too dont have RUN

so i belive that OutLook dont have support this.