sample script showing UDF _Word_DocTableWrite not working

[MidNiteRider]

within the AutoIt Help (v.3.3.14.2), there is an example script showing how to use UDF _Word_DocTableWrite, (shown here):

>>>>>

#include <MsgBoxConstants.au3>
#include <Word.au3>

; Create application object
Local $oWord = _Word_Create()
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Word UDF: _Word_DocTableWrite Example", _
        "Error creating a new Word application object." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
; Open the test document
Local $oDoc = _Word_DocOpen($oWord, @ScriptDir & "\Extras\Test.doc", Default, Default, True)
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Word UDF: _Word_DocTableWrite Example", _
        "Error opening '.\Extras\Test.doc'." & @CRLF & "@error = " & @error & ", @extended = " & @extended)

; *****************************************************************************
; Write the content of a 0-based two dimensional array to a Word table
; *****************************************************************************
Local $asArray[3][3] = [[1, 2, 3], ["a", "b", "c"], ["x", "y", "z"]]
Local $oRange = _Word_DocRangeSet($oDoc, -2)
_Word_DocTableWrite($oRange, $asArray, 0)
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Word UDF: _Word_DocTableWrite Example", _
        "Error creating the table." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
MsgBox($MB_SYSTEMMODAL, "Word UDF: _Word_DocTableWrite Example", _
        "Table successfully added to the end of the document.")

<<<<<

When running this on my machine (Windows 7 Pro and Word 2016), the script returns the following error box:

Error creating the table.     @error = 3, @extended = -2147352567

Apparently, within the UDF, an attempt to set the .Text value for the object range is passing back this strange error code.

$oRange.Text = $sData

I seem to recall similar Office Automation COM error in the past, but don't recall what caused it or the solution.  Anyone have any idea or suggestions on getting past this error?

[MidNiteRider]

NEVER MIND!  Further investigation reveals that the example script opens the word doc as readonly (using Word_DocOpen UDF), and if you make a modified version of the script to not open as read only, this error disappears.

; Open the test document
Local $oDoc = _Word_DocOpen($oWord, @ScriptDir & "\Extras\Test.doc", Default, Default, True)

Changing the last passed parameter from True to False causes the issue to go away.

Not sure of this error is a side effect of Word 2016, or if the setting of the .Text value fails on a read-only file in previous versions of Word also.

Anyways, I understand why the example open the test doc as read-only, was just a bit confusing as all other examples I have tried worked perfectly without any changes.

[water]

IIRC I have already fixed this bug in the next beta version of AutoIt.