Help with Excel - insert macro

[Rimantas]

Hi ,
It is needful to run in Excel application one macro through CreateObject( "Excel.Application" ) . After research I found , that macro I can run like something that - oExc:Run( "Macro name" ) . But the problems is to create macro inside this Excel book , in runtime of Fwh apllication . I didn't found how to do that ... . Maybe you know how to do something similar ? The macro contains ~ 20 strings - some needful command ...

With best regards ! Rimantas

[Jack]

I had the same situation :
I write my macro in a different xls file .
I open it first,then i open the good xls file .
After that i execute the macro from the first xls .

oxls:WorkBooks:Open("G:\tables\MACRODMEDI.XLS")
oBookm := oxls:Get( "ActiveWorkBook")
oxls:WorkBooks:Open("myxlsfile.xls")
oBook := oxls:Get( "ActiveWorkBook")
oSheet := oxls:Get( "ActiveSheet" )
oXls:run("MACRODMEDI.XLS!ARCHF",wnarch) && wnarch is a parameter i pass to the macro (function)
sysrefresh()
oBookm:close()
oxls:Sheets("Actif"):select()
oSheet := oxls:Get( "ActiveSheet" )


Hope that will help you

[driessen]

Jack,

Is it possible to run Outlook-macros the same way ?
Do you have any experience with Outlook ?

If so, can you provide an example ?

Thanks a lot in advance.

[Rimantas]

oxls:WorkBooks:Open("G:\tables\MACRODMEDI.XLS")
oBookm := oxls:Get( "ActiveWorkBook")
oxls:WorkBooks:Open("myxlsfile.xls")
oBook := oxls:Get( "ActiveWorkBook")
oSheet := oxls:Get( "ActiveSheet" )
oXls:run("MACRODMEDI.XLS!ARCHF",wnarch) && wnarch is a parameter i pass to the macro (function)
sysrefresh()
oBookm:close()
oxls:Sheets("Actif"):select()
oSheet := oxls:Get( "ActiveSheet" )

Many thanks , Jack , to you !

With best regards ! Rimantas

[Jack]

Michel,
Sorry but i never try to run macro and outlook .