Selection.Find.Execute('somestring',
false,
false,
false,
false,
false,
wdFindContinue,
false,
false,
'somevalue'
wdReplaceAll,
false,
false,
false,
false);
Также у вас должны быть некоторые константы слова, такие как:
var wdReplaceAll = 2;
var wdFindContinue = 1;