Вот код, пишет
{ВнешняяОбработка.ПечатьРегБланка.МодульОбъекта(167)}: Значение не является значением объектного типа (Find)
    КомОбъект.Selection.Find.ClearFormatting();



АктивныйДокумент = ПолучитьМакет("Перемещение");
        КомОбъект = АктивныйДокумент.Получить().Application;
        ЗаменаСловВДокументе("FIOSotr", Выборка.Сотрудник);
        КомОбъект.Visible=1;
Вот функция замены

Функция ЗаменаСловВДокументе(СтрокаПоиска, СтрокаЗамены, СпособЗамены = 2)
    КомОбъект.Selection.Find.ClearFormatting();
    
    FindText             = СокрЛП(СтрокаПоиска);
    MatchCase             = 1;
    MatchWholeWord         = 1;
    MatchWildcards         = 0;
    MatchSoundsLike     = 0;
    MatchAllWordForms     = 0;
    wForward             = 1;
    Wrap                 = 1;
    wFormat             = 1;
    ReplaceWith         = СокрЛП(СтрокаЗамены);
    
    КомОбъект.Selection.Find.Execute(FindText, MatchCase, MatchWholeWord, MatchWildcards, MatchSoundsLike, MatchAllWordForms, wForward, Wrap, wFormat, ReplaceWith,
                                СпособЗамены, , , , 0);
КонецФункции

КомОбъект общая переменная модуля

когда из файла напрямую работал всё ок было
    Word    = Новый COMОбъект("Word.Application");
        Word.Documents.Add(Каталог);
Word.Selection.Find.ClearFormatting();


когда ворд в качестве макета затык