Selection.FindとRange.Findの違い

https://docs.microsoft.com/ja-jp/office/vba/api/word.find
Selection.Findは検索したところに選択が移動する。
Range.Findは選択は固定され、移動しない。

FindExecuteとFindExecute2007の違い

Selection.Find.Execute2007(FindText, MatchCase, MatchWholeWord, MatchWildcards, MatchSoundsLike, MatchAllWordForms, Forward, Wrap, Format, ReplaceWith, Replace, MatchKashida, MatchDiacritics, MatchAlefHamza, MatchControl, MatchPrefix, MatchSuffix, MatchPhrase, IgnoreSpace, IgnorePunct)
(FindText, MatchCase, MatchWholeWord, MatchWildcards, MatchSoundsLike, MatchAllWordForms, Forward, Wrap, Format, ReplaceWith, Replace, MatchKashida, MatchDiacritics, MatchAlefHamza, MatchControl)
返り値 Find Object 共通

Find.Execute2007は新しいオプションが追加

もちろんWord2007から
MatchPrefix MatchSuffix Variant True [ 接頭辞に一致] [ 接尾辞に一致する]
IgnoreSpace Variant True 単語間の空白はすべて無視するようにします。 [検索し、置換] ダイアログボックスで [空白文字を無視] チェックボックスに対応します。
IngnorePunct Variant True を単語の間のすべての区切り記号を無視します。 [検索と置換] ダイアログボックスの [句読点を無視する] チェックボックスに対応します。

Find.execute*に入っていないもの

Findにすら入っていないもの

日本語のあいまい検索のオプション

これらはFindではなくOptionsオブジェクトに入っている。
MatchFuzzyAY イの段、エの段に続く　ア/ヤ
MatchFuzzyBV バ/ヴァハ/ファ

あいまい系の選択は排他になっている

あいまい検索(英)(日)、ワイルドカード、異なる活用形はすべてどれか一つしか選択できない。

自動的に無効化されないが、チェックボックスを選ぶと勝手に選択され、オプションが変更されてしまう。
これをVBAとしていうと
MatchPhrase、MatchWildcards、MatchSoundsLike、MatchAllWordForms、MatchFuzzyパラメータは、同時にTrueに設定することができません

自動的に選択できなくなるもの

あいまい検索(英) True

大文字と小文字を区別する完全に一致する単語だけを検索する　接頭辞に一致する接尾辞に一致する半角と全角を区別するあいまい検索(日) ワイルドカードを使用するは選べない

あいまい検索(日) True

あいまい検索(英) が選べないほか、英語と同じものが選べないさらにオプションで細かい指定ができる。
ただしこの細かいオプションはFindオブジェクトではなくOptionsオブジェクト。

ワイルドカードを使用する

大文字　完全一致　接頭辞接尾辞全角半角は選択できない
これが選択できたらワイルドじゃない。

英単語の異なる活用形を無視する

ワイルドカードと同様大文字小文字　完全一致接頭辞接尾辞全角半角は選択できない
英語だから全角はない。異なる活用形のため完全一致はない。大文字小文字もない。（動名詞だと文頭がある）接頭接尾活用形だから当然ない。

誤訳

MatchWholeWord [完全に一致する単語だけを検索する]~~[単語全体のみを検索する]~~ チェックボックスで、[検索と置換] ダイアログボックスに対応します。

定数

WdReplace enumeration (Word)

Specifies the number of replacements to be made when find and replace is used.
Name Value Description
wdReplaceAll 2 Replace all occurrences. すべて置換
wdReplaceNone 0 Replace no occurrences. 置換しない
wdReplaceOne 1 Replace the first occurrence encountered. 最初に一致したものを置換する

使用例

.Execute Replace:=wdReplaceAll

コード

Sub WordTwoLinesOnelineJpn()
' For Word 2007 Later
' 日本語用 For Japanese
With Selection
.EndKey Unit:=wdStory 'いったん文末に飛ばし、文頭に飛ばす
.HomeKey Unit:=wdStory
.Find.ClearFormatting '段落書式指定をクリア
.Find.Replacement.ClearFormatting 'Removes text and paragraph formatting from the text specified in a replace operation.
.Find.ClearAllFuzzyOptions 'Clears all nonspecific search options associated with Japanese text.
.Find.ClearHitHighlight
With .Find
.Text = "^13^13"
.Replacement.Text = "^p"
.Forward = True
.LanguageIDFarEast = wdJapanese '日本語以外では設定を変えるか省略する
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchByte = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchFuzzy = False
.MatchWildcards = True
'.Execute2007 'Selection.Find.Execute2007(FindText, MatchCase, MatchWholeWord, MatchWildcards, MatchSoundsLike, MatchAllWordForms, Forward, Wrap, Format, ReplaceWith, Replace, MatchKashida, MatchDiacritics, MatchAlefHamza, MatchControl, MatchPrefix, MatchSuffix, MatchPhrase, IgnoreSpace, IgnorePunct)
.Execute Replace:=wdReplaceAll 'ここを外さない 'Selection.Find.Execute (FindText, MatchCase, MatchWholeWord, MatchWildcards, MatchSoundsLike, MatchAllWordForms, Forward, Wrap, Format, ReplaceWith, Replace, MatchKashida, MatchDiacritics, MatchAlefHamza, MatchControl)
End With
End With
End Sub

あいまい検索(日)のオプションを設定するパターン

.MatchFuzzy = True

ここでTrueにしてから、Optionsの設定に入る。
最後にExecute

Sub Findあいまい日本語()
'日本語のあいまい検索のパターン
'For Word 2007 later
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "AAAA"
.Replacement.Text = "AAAA"
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchByte = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = False
.MatchFuzzy = True
End With
With Options 'ExecuteではなくここからOptionを指定する
.MatchFuzzyCase = False
.MatchFuzzyByte = True
.MatchFuzzyHiragana = False
.MatchFuzzySmallKana = False
.MatchFuzzyDash = False
.MatchFuzzyIterationMark = False 'Trueだと繰り返し記号が区別されない。
.MatchFuzzyKanji = False 'Trueだと漢字の異体字を許容され、区別されない
.MatchFuzzyOldKana = False
.MatchFuzzyProlongedSoundMark = False
.MatchFuzzyDZ = False ’ジ/ヂ ズ/ヅ di/zi zu/du を区別しない
.MatchFuzzyBV = False ’ファ/ハ バ/ヴァ fa/ha ba/vaを区別しない
.MatchFuzzyTC = False 'ティ/チ ディ/ジ を区別しない
.MatchFuzzyHF = False
.MatchFuzzyZJ = False
.MatchFuzzyAY = False 'イ段とエ段の後ろのア、ヤを区別しない。クリアとクリヤみたいなやつ。
.MatchFuzzyKiKu = False ’Trueだとサ行の前のキとクが区別されない
.MatchFuzzyPunctuation = False
.MatchFuzzySpace = True
End With
Selection.Find.Execute2007
End Sub

参考

WordマクロのFindのプロパティ(まとめ)
https://stabucky.com/wp/archives/7731
ワイルドカードを使った検索と置換を極める教えて！ヘルプデスク
http://office-qa.com/Word/wd211.htm