Range.Find.Execute not working in 2013 word

Question

Consider the following table in Word 2013

A BBB
A CCC
D E F

A, B, and C are merged cells.

A and B are empty. C has text Ainside.

Now the following code

Set rng = ActiveDocument.Range(0, 0)  
With rng.Find
    .Forward = True
    .Wrap = wdFindStop
    .Execute "A"
End With

The word failed on Execute "A".

If I change the text to Execute "B", it does not find anything, but does not break the word. The problem is present only in the word 2013.

We tried to search manually and Selection.Findby cell, but both of them are pretty slow.

Is there a quick way around this error?

EDIT: this is the minimal example of a failure that I built. In our application, we use a lot Range.Find, sometimes with a wrapper, and almost never start with Document.Start

EDIT2: , , ( Word 97-2003).

Answer 1

.Find Tables(index).Selection, ?

.Selection ActiveDocument Table, , . .

ActiveDocument.Tables(1).Select
With Selection.Find
    .Forward = True
    .Wrap = wdFindStop
    .Execute FindText:="A"
End With