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