Автор Тема: Excel Макрос Excel вставка разрыва страницы в документ Word  (Прочитано 244 раз)

Оффлайн Посетитель 20.10.2022

  • Посетитель форума
  • Сообщений: 1
Здравствуйте, форумчане. Проблема в следующем.
Нужно перенести таблицу 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

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

Оффлайн Администратор

  • Administrator
  • Сообщений: 2162
Написал вам два письма на почту с заголовком "Письмо с Форума по VBA, Excel и Word". Написал именно на почту, а не на форум.

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