Not able to open Excel spreadsheet for read - (Moved)

[MP1454]

Gurus,

I'm getting @error = 3 on _Excell_BookOpen on an AutoIt Version 3.0 console app and I don't know what I'm doing wrong. I haven't found any working examples of just reading through an existing spreadsheet. Any help would be greatly appreciated. 

It's an Excel 365 spreadsheet on Windows 10. Here is my code  sample:

#include <Excel.au3>
$sourceFile = "Duplicates.xlsx"

If Not FileExists($sourceFile) Then
    ConsoleWrite("Oops, don't see '" & $sourceFile & "'" & @LF)
    Exit
EndIf

$oExcel = _Excel_Open();False,False,False,False,False)  ; hidden instance
If @error Then
    ConsoleWrite("Failed to open spreadsheet")
    Exit
EndIf

$oWorkbook = _Excel_BookOpen($oExcel,$sourceFile,True,False)    ; readonly
If @error Then
    ConsoleWrite("Excel UDF: _Excel_BookOpen, Error opening '" & $sourceFile & "'." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
    _Excel_Close($oExcel)
    Exit
EndIf

Doing a Test Run or running the commandline compiled exe I get

Quote

Excel UDF: _Excel_BookOpen, Error opening 'Duplicates.xlsx'.
@error = 3, @extended = -2147352567

What am I doing wrong?

MP1454

[Danp2]

You could add a COM error handler to assist with identifying the problem. Try running this revised code --

#include <Excel.au3>
$sourceFile = "Duplicates.xlsx"
Global $oMyError = ObjEvent("AutoIt.Error", "ErrFunc") ;Install a custom error handler

If Not FileExists($sourceFile) Then
    ConsoleWrite("Oops, don't see '" & $sourceFile & "'" & @LF)
    Exit
EndIf

$oExcel = _Excel_Open();False,False,False,False,False)  ; hidden instance
If @error Then
    ConsoleWrite("Failed to open spreadsheet")
    Exit
EndIf

$oWorkbook = _Excel_BookOpen($oExcel,$sourceFile,True,False)    ; readonly
If @error Then
    ConsoleWrite("Excel UDF: _Excel_BookOpen, Error opening '" & $sourceFile & "'." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
    _Excel_Close($oExcel)
    Exit
EndIf

;This is a custom error handler
Func ErrFunc()
    Local $HexNumber = Hex($oMyError.number, 8)
    ConsoleWrite("->    We intercepted a COM Error !" & @CRLF & _
        "->    err.number is: " & @TAB & $HexNumber & @CRLF & _
        "->    err.source: " & @TAB & $oMyError.source & @CRLF & _
        "->    err.windescription: " & @TAB & $oMyError.windescription & _
        "->    err.scriptline is: " & @TAB & $oMyError.scriptline & @CRLF)
EndFunc   ;==>ErrFunc

 

[Melba23]

Moved to the appropriate forum.

Moderation Team

[water]

The error you get tells you that the workbook is protected by a password. 

[MP1454]

I found the issue. In earlier pre-Excel versions of my script I had no problems opening files without a path, assuming the files were in the same folder as the script or compiled executable, which they were. Everything worked fine.

But with _Excel.au3, I got the error until I replaced $sourceFile with the full path. So that was the issue. Interesting enough, if I use a relative path ".\Test.xlsx" it opens a blank Excel instance and just sits there. Doesn't abort; doesn't open the spreadsheet.

So there you go, _Excel.au3 is limited in that it has to have a full file path, unlike the built-in FileOpen() which works fine without a full path.

Thanks for at least replying to my call for help.