[置換]ダイアログボックスを表示するには、、組み込みダイアログボックスを
表すDialogオブジェクトを使用します。

　なお且つ､検索文字列と置換文字列に文字列が設定された状態でダイアログボックス
を表示するには、次のように指定します。

Sub Sample()
    Application.Dialogs(xlDialogFormulaReplace).Show arg1:="ABC", arg2:="XYZ"
End Sub

　検索文字列には「ABC」置換文字列には「XYZ」が設定されます。