How to find and replace programmatically in ENTIRE Word document

Question

I have a Word document with text in tables and text outside tables. I want to find and replace in all the text, not just the text outside the tables. The content property of the document is just the "main story" and not the tables. I don't want to iterate through all the table objects. I just want to find and replace in all the text, just like when I do it manually using the Word gui.

Please save me from the mental hell I am burning in.

[The stench of burning flesh is starting to worry me. Almost as much as the excruciating pain in my extremities.]

[My legs and arms have been devoured by the flames. I write this with my nose, which is sticky with melted plastic from the keys.]

Answer 1

Use the Find property, it is the same as the UI. Search help topic for "Find Property" to get you started.

With ActiveDocument.Range.Find
    .Text = "hi"
    .Replacement.Text = "hello"
    .Execute Replace:=wdReplaceAll, Forward:=True, Wrap:=wdFindContinue
End With