1

Тема: Разрывы разделов на одной странице

Подскажите, как после открытия документа программно узнать, если ли в данном документе хотя бы одна страница, на которой находятся сразу несколько разделов (созданных командой Вставить - Разрыв раздела - На текущей странице)?

2

Re: Разрывы разделов на одной странице

Алгоритм такой:

1. Ищем все разрывы раздела в документе:
Range.Find.Text = "^b"

2. Найденный раздел проверяем как начинающийся с новой страницы:
Select Case Range.Sections.First.PageSetup.SectionStart
        Case wdSectionEvenPage, wdSectionNewPage, wdSectionOddPage
         ' раздел с новой страницы       
End Select

Макросы под заказ и готовый пакет - mtdmacro.ru

3

Re: Разрывы разделов на одной странице

Спасибо! будем пробовать!