Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Ветеран


Сообщения: 27449
Благодарности: 8088

Профиль | Отправить PM | Цитировать


Цитата CyraxZ:
Как это сделать с помощью стилей ? В параметрах стилей нет свойств колонок. »
Никак — колонки относятся к разделу.

Цитата CyraxZ:
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
Это сообщение посчитали полезным следующие участники:

Отправлено: 15:30, 13-04-2012 | #2