_Word_DocFindReplace Help example adds replaced text as all CAPs

[pseakins]

Example1 for _Word_DocFindReplace from the AutoIt help works as promised.

However, when I change the search string from "test document" to "udf" the replaced text is all uppercase.

ie; from this _Word_DocFindReplace($oDoc, "test document", "test document with replaced text")
         to this _Word_DocFindReplace($oDoc, "udf", "test document with replaced text")

I can't see any reason why this would happen, as far I know the text "UDF" at the end of the first line in the source document "\Extras\Test.doc" is just normal text that happens to be upper case. There's no reason (that I can see) that the replacement text should become all upper case. Am I missing something?

 

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

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

; Change "test document" to "test document with replaced text".
_Word_DocFindReplace($oDoc, "test document", "test document with replaced text")
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Word UDF: _Word_DocFindReplace Example", _
        "Error replacing text in the document." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
MsgBox($MB_SYSTEMMODAL, "Word UDF: _Word_DocFindReplace Example", "Text successfully replaced.")

 

[Subz]

Find and replaced doesn't modify the formatting of the word, you'll notice that UDF is all caps in the example document.

[Subz]

Forgot to mention that if you want to change the case, you need to use $bMatchCase, for example:

_Word_DocFindReplace($oDoc, "UDF", "test document with replaced text", $WdReplaceAll, 0, True)

 

[pseakins]

From the AutoIt helpfile; $bMatchCase [optional] If True the find is case sensitive (default = False)

$bMatchCase is used to mofify the search parameters and should have nothing to do with the "format" of the replaced characters.

As far as I know, upper and lower case in Word is not a "format'. While you can modify the case of a word using Shift-F3 there is no actual property (like bold or underline) that specifies that the entire word is one case or another. If you make a word bold, for example, and then manually edit the word by typing extra characters, those new characters become bold because that is the format that is in use at the time.. The same does not apply if the word were all uppercase and then you insert extra characters. The new characters would go in with whatever case has been selected by the keyboard.

Having said all that it turns out that Microsoft Word does in fact use the search match case flag to perform some quite unintuitive magic.

After a bit of googling I found this Microsoft answer; Replace requires "Match case" to be selected if one wants to Replace preserving the case of the replacement text. (I edited the subject so it made more sense.)

As one of the respondents said "This is an anomaly you will have to live with. "

My test case code will behave as required by changing it to;

_Word_DocFindReplace($oDoc, "UDF", "text replaced here", 1, Default, 1)

 

[water]

Added a link to this thread to the AutoIt wiki.