Excel Макрос Excel вставка разрыва страницы в документ Word

Автор Посетитель, 22 ноября 2022, 17:44

Посетитель

Здравствуйте, форумчане. Проблема в следующем.
Нужно перенести таблицу Excel в документ Word так, чтобы на листе было два дня. Тема диплома может занимать от одной до трёх строк - высота таблицы на листе разная. Количество экзаменуемых на разных специальностях разное.
Если можно вставлять разрыв страницы, до делалось-бы это элементарно.

Dim wdDoc As Object ...
Закладка.Select
wdDoc.Selection.InsertBreak Type:=wdPageBreak

Курсор в Word на закладку становится, а на разрыве страницы ошибка Run-time error '438':
Object doesn't support this property or method

Заранее признателен за совет.

Администратор

Написал вам два письма на почту с заголовком "Письмо с Форума по VBA, Excel и Word". Написал именно на почту, а не на форум.

Вы хотите с помощью макроса поставить разрыв страницы в то место, где стоит закладка (объект "Bookmark")?
Вы запускаете макрос из Экселя? Если да, то Экселю не известны константы Ворда, поэтому вместо констант нужно использовать значения констант. В вашем коде используется константа "wdPageBreak", вместо этой константы запишите число:
wdDoc.Selection.InsertBreak Type:=7