Здравствуйте!

Подскажите пожалуйста. Как реализовать следующее поведение: из 1С в ворде необходимо найти нужное слово, удалить его и вместо этого слова вставить разрыв страницы.
---
Так же как и при интерактивной работе, программно любое слово можно заменить на специальный символ – абзац или разрыв страницы.
Разрыв страницы это "^m":
```1c
    Документ.Content.Find.Execute(СловоЗамены, Ложь, Ложь, Ложь, , , Истина, , Ложь, "^m", 2);
```
---
Так же как и при интерактивной работе, программно любое слово можно заменить на специальный символ – абзац или разрыв страницы.
Разрыв страницы это "^m":
```1c
    Документ.Content.Find.Execute(СловоЗамены, Ложь, Ложь, Ложь, , , Истина, , Ложь, "^m", 2);
```
---
Хм, это очень мне очень понравилось)
---
https://helpme1c.ru/rabota-s-word-v-yazyke-1s-8-3-8-2-v-primerax
Ориентироваться в методах, перечислениях и прочем помогает описание объектной модели от MS:
https://docs.microsoft.com/ru-ru/office/vba/api/overview/word/object-model
---
не подходит коллекция Fields у меня пустая, возможно из за того, что файл открывается новый еще не сохраненный.
Нашел такой вариант, но хотелось бы выделить всю строку, а не одно слово.

For Each i In myDocument.Words() do
 f i.text = "Слово" then
  myDocument.Range(i.Start, i.End).Select();
 endif;
EndDo;
---
```1c
    Word = Новый COMОбъект("Word.Application");
    ...
    Для каждого Слово Из Область.Words Цикл
    СловоДляПроверки = СокрЛП(Слово.Text);
    ...
    InsertBreak(Word.WdBreakType _
    .wdSectionBreakNextPage)
```

wdColumnBreak 8 Column break at the insertion point.
wdLineBreak 6 Line break.
wdLineBreakClearLeft 9 Line break.
wdLineBreakClearRight 10 Line break.
wdPageBreak 7 Page break at the insertion point.
wdSectionBreakContinuous 3 New section without a corresponding page break.
wdSectionBreakEvenPage 4 Section break with the next section beginning on the next even-numbered page. If the section break falls on an even-numbered page, Word leaves the next odd-numbered page blank.
wdSectionBreakNextPage 2 Section break on next page.
wdSectionBreakOddPage 5 Section break with the next section beginning on the next odd-numbered page. If the section break falls on an odd-numbered page, Word leaves the next even-numbered page blank.
wdTextWrappingBreak 11 Ends the current line and forces the text to continue below a picture, table, or other item. The text continues on the next blank line that does not contain a table aligned with the left or right margin.
---
вы как раз описали тот вариант который я нашел. Но как выделить всю строку?
---
Но как выделить всю строку?

Не понял зачем...

Разрыв работает из любой "точки" строки (позиции)

Примерно:
Область = Док.Range(0,0);
Область.InsertBreak(2); //наверно "2" (в кавычках) - не помню точно

P.S.ПоследнийПараграф=Док.Range().Paragraphs.Add (Док.Range().Characters.Last);
P.P.S.

```1c
    word = Новый COMОбъект("Word.Application");
    word.Caption="Личные данные.doc";
    word.Visible=1;
    doc = word.Documents;
    newdoc = doc.Add();
    selection = word.Selection;
    table = newdoc.Tables.Add(selection.Range(),40,2,1,0);
    Selection.MoveDown(5,49);
    Selection.InsertBreak(7);
    selection = word.Selection;
    table = newdoc.Tables.Add(selection.Range(),40,2,1,0);
    Selection.MoveDown(5,48);
    Selection.InsertBreak(7);
    selection = word.Selection;
    table = newdoc.Tables.Add(selection.Range(),40,2,1,0);//сохранение д-та
    doc.SaveAs("d:\Личные данные.doc");
    doc = 0;
    word.quit(0);
    word = 0;
```
---
Тоже использую, на мой взгляд самый удобный способ.

```1c
    Selection.InsertBreak(7);
```

Вообще на будущее ТС, в самом Word: Вид->Макросы->Запись макроса
И потом можно посмотреть код исполнения данного действия в макросе по кнопке изменить.