[Solved] Function _Word_DocFindReplace() can be changed?

[KickStarter15]

Hi Experts,

I just want to ask and assistance if _Word_DocFindReplace() can be changed of what you want to replaced and not all characters in "$oFind" will be replaced? Like, I want to find "^$^#^p" in the document and replace only "^p" with delimiter "; ".

#include <Word.au3>
Local $oWord = _Word_Create()
Local $sDocument = @ScriptDir & "\word.docx"
Local $oDoc = _Word_DocOpen($oWord, $sDocument, Default, Default, True)
$oFind = "^$^#^p" ; I want only "^p" to be replaced
$oReplace = "; "
_Word_DocFindReplace($oDoc, $oFind, $oReplace, $wdReplaceOne, 0, True, True)

Thanks in advance Experts,

KS15

Edited April 18, 2017 by KickStarter15

[water]

Why not use

$oFind    = "^$^#^p" ; I want only "^p" to be replaced
$oReplace = "^$^#; "

 

[KickStarter15]

@water Thanks, I tried that one but the code will not execute, "^$" and "^#" is not recognized as characters in "$oReplace" but if you change "^$" to "a" and "^#" to "1" then the code will execute replacing "$oFind".

[water]

I think the following document is a good reading how to solve your problem:
http://wordmvp.com/FAQs/General/UsingWildcards.htm

[KickStarter15]

@water, Thank you for this reading guide on how to handle find and replace in document using wildcards. This is a big help for me in my future projects. However, after reading the guide, it seems that it is all about replacing the characters to find using wildcards and not replacing the characters being found or was found in _Word_DocFindReplace().

In "$oFind", lets say we use the wildcards from guide, It is still the same concern with this:

On 4/14/2017 at 3:41 PM, KickStarter15 said:

"^$" and "^#" is not recognized as characters in "$oReplace" but if you change "^$" to "a" and "^#" to "1" then the code will execute replacing "$oFind".

The wildcard being searched is not valid when replacing "$oFind" with "$oReplace". Or maybe, I'm just being so mashup with my understanding with the guide.

 

[water]

Does it make a difference if you set parameter $bMatchWildcards to True? Default si False.

[KickStarter15]

Oops! missed that one.

Here it is, I tried having it declared as below but still having the same issue.

Find for numbers "[0-9]" followed by paragraph marks "^13" and replace with "[0-9]; " and the output is "word[0-9]; " from "word1^13".

$oFind = "[0-9]^13"
$oReplace = "[0-9]; "
With $oWord.Selection.Find
   .ClearFormatting
   .Replacement.ClearFormatting
;~    expression.Execute(FindText, MatchCase, MatchWholeWord, MatchWildcards, &_
;~ MatchSoundsLike, MatchAllWordForms, Forward, Wrap, Format, ReplaceWith, Replace,&_
;~ MatchKashida, MatchDiacritics, MatchAlefHamza, MatchControl)
   .Execute($oFind, false, false, true, false, false, true, false, false, $oReplace, $wdReplaceAll)
EndWith
MsgBox(0,"","Done!")

I think this is impossible to do right @water? I just need to replace paragraph marks after the number with delimiter "; " but why so hard.

Tried it also this way, the same issue.

$oFind = "[0-9]^13"
$oReplace = "[0-9]; "
; _Word_DocFindReplace($oDoc, FindText, ReplaceText, $iReplace, $vSearchRange, $bMatchCase, $bMatchWholeWord, $bMatchWildcards)
_Word_DocFindReplace($oDoc, $oFind, $oReplace, $wdReplaceOne, False, False, False, True)

 

Edited April 17, 2017 by KickStarter15

[water]

Can't test at the moment but I think it could be something like this:

$oFind = "([0-9])^13"
$oReplace = "\1; "

 

[KickStarter15]

@water I admit that I really need to understand the guide you shared to me. Thanks a lot, that simple code do the trick.

Thank you so much Water. Now I should read and understand this guide.

[water]

Glad this little piece of code works for you.
I will add have added the link to the wiki for future reference.

Edited April 17, 2017 by water