В MS-Word как VBA разделяет таблицу, вставляя разрыв раздела и знак абзаца

Question

wdSectionBreakNextPage не идет с конечной меткой абзаца

У меня есть массивная таблица, которую я копирую из Excel в слово, посыпанная самодельными полями PAGEX и SECTIONX.Мой макрос изменит их на разрывы страниц и разделов, разделив таблицу для каждого (что я хочу).Но разрывы страниц идут с конечным знаком абзаца до разрыва таблицы и раздела.Моя слабая попытка вставить знак абзаца после разрыва раздела всегда заканчивается знаком абзаца внутри таблицы.

Моя цель - получить одинаковый разрыв между моим заголовком и началом таблицы после обоих разрывов разделаи разрывы страниц.Я думаю, я просто хочу, чтобы макрос вставлял метку абзаца после разрывов моего раздела, аналогично тому, как работает wdPageBreak (т. Е. Между разрывом и таблицей).Но я открыт для предложений.

Как, возможно, дальнейшее пояснение, выполнение этого вручную включает создание новой строки после разрыва раздела, а затем преобразование этой строки в текст (довольно непрактично для подсчетов, на которые я смотрю).

    Do While .Execute
        Selection.Delete
        Selection.InsertBreak Type:=wdSectionBreakNextPage
    Loop

Answer 1

Попробуйте:

ActiveDocument.Compatibility(wdSplitPgBreakAndParaMark) = False

Answer 2

спасибо бесплатно и макро. Я, вероятно, должен был заметить, что я новичок в VBA (в основном вырезать и вставить). я решил, что проще всего просто вставить разрыв страницы после каждого разрыва раздела, а затем сделать замену ^ m ^ p на ^ p.

это работает в моем случае, но не будет работать для других, читающих это, если у них есть разрывы страниц, которые они не хотят потерять.

GJ