Need to convert Excel Macro to AutoIt code

[deef99]

I have a simple macro in Excel that saves 3 worksheets to 3 tab delimited text files. The xls is a static name and so are the 3 text files so I thought this should be very simple. Can someone please assist?

Here is the Excel Macro:

ChDir "G:\CallCenter_downloads\DailyDIG"

Sheets("Pre_Activated_1").Select

ActiveWorkbook.SaveAs Filename:="G:\CallCenter_downloads\DailyDIG\PreA.txt", _

FileFormat:=xlText, CreateBackup:=False

Sheets("Just_Activated_2").Select

ActiveWorkbook.SaveAs Filename:="G:\CallCenter_downloads\DailyDIG\JustA.txt" _

, FileFormat:=xlText, CreateBackup:=False

Sheets("Changed_while_Active_4").Select

ActiveWorkbook.SaveAs Filename:="G:\CallCenter_downloads\DailyDIG\CwA.txt" _

, FileFormat:=xlText, CreateBackup:=False

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

THIS IS WHAT I HAVE SO FAR:

global $oExcel = _ExcelBookOpen("\\baardfiles\common\CallCenter_downloads\DailyDIG\DIG_Midday.xls")

_ExcelSheetActivate($oExcel, "Pre-activation_1")

... and then I'm completely lost!

[water]

Use _ExcelReadSheetToArray to read the sheet into a 2D array and then loop through the array and save the data to the files.

[Reg2Post]

Using the Excel.au3 UDF:

$oExcel = _ExcelBookOpen("baardfilescommonCallCenter_downloadsDailyDIGDIG_Midday.xls")
_ExcelSheetActivate($oExcel, "Pre-activation_1")

_ExcelBookSaveAs($oExcel, G:CallCenter_downloadsDailyDIGPreA.txt, "txt")

_ExcelSheetActivate($oExcel, "Just_Activated_2")

_ExcelBookSaveAs($oExcel, G:CallCenter_downloadsDailyDIGJustA.txt, "txt")

_ExcelSheetActivate($oExcel, "Changed_while_Active_4")

_ExcelBookSaveAs($oExcel, G:CallCenter_downloadsDailyDIGCwA.txt, "txt")

Close the workbook manually or append _ExcelBookClose() to above.

[deef99]

This is what I have....it seems to run without error, but no txt files are getting created. I even tried opening the workbook first, but it doesn't seem like it's doing anything. Did I miss something?

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****

#AutoIt3Wrapper_Outfile=G:CallCenter_downloadsDailyDIGexceldig.exe

#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****

#include <Excel.au3>

#include <String.au3>

$oExcel = _ExcelBookOpen("baardfiles01commonCallCenter_downloadsDailyDIGDIG_Midday.xls")

_ExcelSheetActivate($oExcel, "Pre-activation_1")

_ExcelBookSaveAs($oExcel,"baardfiles01commonCallCenter_downloadsDailyDIGPreA.txt", "txt")

_ExcelSheetActivate($oExcel, "Just_Activated_2")

_ExcelBookSaveAs($oExcel,"baardfiles01commonCallCenter_downloadsDailyDIGJustA.txt", "txt")

_ExcelSheetActivate($oExcel, "Changed_while_Active_4")

_ExcelBookSaveAs($oExcel,"baardfiles01commonCallCenter_downloadsDailyDIGCwA.txt", "txt")

_ExcelBookClose($oExcel, 1, 0)

[BrewManNH]

You should do some error checking after every operation, see if any errors are returned, and what the errors might be. That will help figure it out.

[Reg2Post]

@OP:

Check your output paths. You have different shared folder paths from your latest code and your original post. Try saving to a local path to test script functionality.

Such as: _ExcelBookSaveAs($oExcel,@scriptdir & "CwA.txt", "txt")

[deef99]

Ok...thank you so much. I will try that. I greatly appreciate the code!