run excel macros with autoit [SOLVED]

[theAutoitSpammer]

[sOLVED see my second post]

After much reading I still can't figure out how to run an excel macro.

here is my problem

1-excel book1 already open

2-personal.xls (with several macros in it) running in the background as add-in (invisible)

3-autoit should call macro "compare_files" in module 4 of personal.xls and run it in "book1"

I try some code found here but get an error (see below)

---------------------------------------------

WinActivate("Microsoft Excel - Book1")

WinWaitActive("Microsoft Excel - Book1")

Dim $objXL

$objXL = ObjCreate("Excel.Application")

With $objXL

.Visible = True

$x = .Run("compare_files")

EndWith

---------------------------------

the run function returns an "error in expression"

I think "Run" can't find the macro but I have no idea as to how to point in the right direction.

please help and thanks in advance

Edited November 19, 2008 by alram

[Arikirangi44]

After much reading I still can't figure out how to run an excel macro.

here is my problem

1-excel book1 already open

2-personal.xls (with several macros in it) running in the background as add-in (invisible)

3-autoit should call macro "compare_files" in module 4 of personal.xls and run it in "book1"

I try some code found here but get an error (see below)

---------------------------------------------

WinActivate("Microsoft Excel - Book1")

WinWaitActive("Microsoft Excel - Book1")

Dim $objXL

$objXL = ObjCreate("Excel.Application")

With $objXL

.Visible = True

$x = .Run("compare_files")

EndWith

---------------------------------

the run function returns an "error in expression"

I think "Run" can't find the macro but I have no idea as to how to point in the right direction.

please help and thanks in advance

this UDF works quite well. I use it at work to automate some Excel workbooks..

if you just want to write a few COM functions i sugest you look at the source for this UDF... should point you in the right direction

http://www.autoitscript.com/forum/index.ph...mp;hl=excel+udf

[Arikirangi44]

this might help also

http://www.autoitscript.com/forum/index.ph...12&hl=excel

[theAutoitSpammer]

thank you guys

I found the solution before your posts and is quite simple

anyway is much appreciated and now, with your posts, I can learn more about COM's for Excel

-------------------------------------------------------------

AutoItSetOption("WinTitleMatchMode", 2) ;match any substring in window title

WinActivate("Microsoft Excel")

WinWaitActive("Microsoft Excel")

If WinActive("Microsoft Excel") Then

Dim $objXL

$objXL = ObjGet("", "Excel.Application")

With $objXL

.Visible = True

$x = .Run("'C:\Documents and Settings\Al User\Application Data\Microsoft\Excel\XLSTART\PERSONAL.XLS'!module4.compare_files")

EndWith

EndIf

--------------------------------------------------------------------

thanks again Al

[sivaramanm]

Hey theAutoitSpammer

I am also in need of the same situation of running a macro of Book2 on Book1.

When i ran your above code, I am getting the following error.

Can you please help?

Global $ExcelReport = $BaseDir & "STA_Market_weekly_report_master.xlsx"
 
$oExcel1 = _ExcelBookOpen($ExcelReport,1)_ExcelSheetActivate($oExcel1,"NV 
STA")$oExcel1.run("C:\Users\s.mailappan\Desktop\3G-Reports\week_module.xlsm!A1__Market_Summary") ;*Note:* week_module.xlsm is the second Book 

[BrewManNH]

This is a 5 year old thread, I don't know the poster you asked, but I don't think he's been around much lately.