[Iska]

Как это сделать с помощью стилей ? В параметрах стилей нет свойств колонок. »

Никак — колонки относятся к разделу.

P.S. Можно ли решить задачу без использования макросов ? »

Не думаю. Впрочем, ничего сложного там нет:

1. Вставить разрыв раздела на текущей странице перед выделением.
2. Вставить разрыв раздела на текущей странице после выделения.
3. Оформить выделение несколькими колонками.
4. Добавить Ваши «заранее заданные параметры колонок».

Например:

Код:

Sub Selection2MultiColumns()
    With Selection
        With .Range
            .Collapse wdCollapseStart
            .InsertBreak Type:=wdSectionBreakContinuous
        End With
        
        With .Range
            .Collapse wdCollapseEnd
            .InsertBreak Type:=wdSectionBreakContinuous
        End With
        
        .Start = .Start + 1
        
        With .PageSetup.TextColumns
            .SetCount NumColumns:=2
            .EvenlySpaced = True
            .LineBetween = False
            .Width = CentimetersToPoints(7.62)
            .Spacing = CentimetersToPoints(1.25)
        End With
    End With
End Sub

[CyraxZ]

До начала массовой "колон"изации хочу разобраться с глюком, имеющим место в нижеприереплённом .doc-файле.
В этом файле стоит автоматическая нумерация страниц. На 6 странице имеется фрагмент текста, размещённый в 2 колонки. Соответственно, в документе стало 3 раздела: первый и третий имеют колонтитулы с номерами страниц, 2-й - отвечает за колонки. НО при этом наблюдается 2 артефакта:
1) 6-я страница имеет номер 6 (как и должно быть), а 7-я - номер 3 (а должен быть номер 7).
2) При нажатии кнопки "Перейти к следующему" на панели колонтитулов перехода с 1-го раздела (стр.1-6) к третьему разделу (стр.7-8) не происходит. При этом с 3-го раздела к первому переход происходит нормально.

У всех колонтитулов в свойствах нумерации стоит галка "Продолжить".

Подскажите, что за козявка сидит в документе ?
Проверил на нулёвом документе - при вставке колонок никаких артефактов не наблюдается (сохраняется сплошная нумерация страниц, перемещение по разделам в обе стороны происходит нормально).

[okshef]

Попробуйте удалить нумерацию, надписи в колонтитулах (которые непонятно зачем использованы), а затем снова перенумеровать.

[CyraxZ]

надписи в колонтитулах (которые непонятно зачем использованы)

Как по мне, в колонтитулах нет никаких надписей. Даже пробелов. Только поле номера страницы.

Попробуйте удалить нумерацию... а затем снова перенумеровать.

Удалил номера, колонтитулы. Пронумеровал заново - тот же артефакт: номера 1,2,3,4,5,6,3,4

[okshef]

Тоже не выходит... Для колонтитула 7 страницы снимите "Как в предыдущем", а в формате номера страницы укажите "начать с"... 6

[Iska]

CyraxZ, дело в том, что Вы когда-то во втором разделе установили формат номера страницы таким вот образом: «Нумерация страниц — начинать с: 2».

Теперь, несмотря на то, что нынче этот раздел не имеет видимого колонтитула с номером страницы, эти настройки существуют и являются действующими. Отсюда — номер первой страницы третьего раздела равен «3».

Можно вернуть вобрат нумерацию второго раздела к стандартному виду, выполнив в окне «Immediate» («Ctrl-G») редактора VBA команду:

Код:

ThisDocument.Sections.Item(2).Headers.Item(wdHeaderFooterPrimary).PageNumbers.RestartNumberingAtSection = False

[CyraxZ]

Для колонтитула 7 страницы снимите "Как в предыдущем", а в формате номера страницы укажите "начать с"... 6

Так это заплатка. При изменении числа страниц в 1 разделе нумерация 3-го раздела нарушится.

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

В последующих версиях офиса, наверное, эту недоработку устранили (отсутствие доступа к свойствам раздела одностраничных колонок) ?

Остаётся вопрос, почему при наличии раздела с одностраничной колонкой перемещение по колонтитулам вперёд не происходит (стопорится на разделе с колонкой) ?

[Iska]

В последующих версиях офиса, наверное, эту недоработку устранили (отсутствие доступа к свойствам раздела одностраничных колонок) ? »

Не могу знать вследствие отсутствия доступа к более свежим версиям Microsoft Office. Впрочем, думаю, более опытные коллеги подскажут.

Доступ к искомому диалоговому окну «Формат номера страницы» можно получить, вытащив команду для её вызова («FormatPageNumber») из списка всех команд в диалоговом окне «Настройка» на вкладке «Команды»:

читать дальше »

Так что, доступ есть, только он не слишком очевиден на первый взгляд. Но вызывать её все-таки приходится из обычного режима просмотра (но не режима «Просмотр страницы» — и вот это уже, на мой взгляд — ошибка).

Остаётся вопрос, почему при наличии раздела с одностраничной колонкой перемещение по колонтитулам вперёд не происходит (стопорится на разделе с колонкой) ? »

Поясните примером, не понял вопроса.

[okshef]

эту недоработку устранили »

нет, смотрел в 2010. Но, думаю, это не ошибка. Раздел - это контейнер со своими атрибутами, и машине трудно догадаться, какие настройки из одного вам нужны (или не нужны) в другом. Спасибо Iska, нашел. Только не понимаю - как? Может поделитесь?