How to Transfer SQLlite data to EXCEL?

[reybol7]

Helo again, i trying to find a code in the forum that transfer my sql data to excel but i can't find one, i only find Exel to SQL. bacause i need my sqllite data to be in excel so that i can submit it to my fellow.

[Clark]

You can read the data from SQLLite into an internal array.

Once you have it in an array, just write it out to Excel, using a function similar to this:

func ExcelPrint($InArray)
$sFilePath = @TempDir & "\Temp.xls"
If Not _FileCreate($sFilePath) Then ;Create an .XLS file to attach to
MsgBox(4096, "Error", " Error Creating File - " & @error)
return 1
EndIf
_ExcelBookOpen($sFilePath)
$oExcel = _ExcelBookAttach("Temp.xls", "FileName") ;with $s_mode = "FileName" ==> Name of the open workbook
_ExcelWriteSheetFromArray($oExcel, $inArray, 1, 1, 0, 0)
EndFunc

[reybol7]

@Clark Thank you very much it works owsome.

[water]

If the _ExcelWriteSheetFromArray function is too slow you can find some much faster versions on the forum or in my ExcelEX UDF.

[reybol7]

Yup, it is slow, ok ill download and try yours, Thanks

ohh, what function in your ExcellEX i should use in replacement with Clark function, and try to run the Excel_Export it has an error.

C:Documents and SettingsBolima FamilyMy DocumentsDownloadsExcel Rewrite.au3(289,56) : ERROR: ObjGet() [built-in] called with wrong number of args.

$oWorkbook = ObjGet("", $sCLSID_Workbook, $iCount + 1)

Thanks in advance.

Edited April 22, 2013 by reybol7

[reybol7]

Can you Help me where to find the function created by GreenChan that export SQL to EXCEL, its too complicated to me to understand.

heres the link

http://www.autoitscript.com/forum/index.php?app=core&module=attach&section=attach&attach_id=40099

his SQL to Excel is very very fast.

Edited April 22, 2013 by reybol7

[water]

Yup, it is slow, ok ill download and try yours, Thanks

ohh, what function in your ExcellEX i should use in replacement with Clark function, and try to run the Excel_Export it has an error.

C:Documents and SettingsBolima FamilyMy DocumentsDownloadsExcel Rewrite.au3(289,56) : ERROR: ObjGet() [built-in] called with wrong number of args.

$oWorkbook = ObjGet("", $sCLSID_Workbook, $iCount + 1)

Sorry, my bad. I forgot to mention that you need the latest Beta version of Autoit to run this UDF.

The replacement function is _Excel_RangeWrite.

Edited April 22, 2013 by water

[reybol7]

How can i get the latest Beta sir? my Autoit version is v3.3.8.1

Edited April 22, 2013 by reybol7

[water]

Here you get the latest beta version.