Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Microsoft Office и VBA > Microsoft Office Word
Регистрация

Восстановить пароль
Повторная активизация e-mail

Ответ
 
Опции темы
Старый 10.04.2014, 16:51   #1
DBEER
Форумчанин
 
Регистрация: 13.03.2014
Адрес: Киров-Вятка
Сообщений: 72
Репутация: 25
Печаль Ширина текста в соседних Sections при разной ширине страниц

"Грамотно" вставил в текст раздел, в котором развернул страницу из Portret в Landscape. Хорошо всё, но текст пишется только до прежней ширины, т.е., будто на А4 вертикальном, а не на всю ширину А4 горизонтального (см. скриншот). Вставку раздела, поворот страницы и манипуляции с колонтитулами (передвижка и изменение размеров рамки и т.д.) веду программно из VBA. Какое свойсвто надо подергать, чтобы текст писался на всю ширину страницы. Если я вставляю горизонтальную страницу из внешнего фапйла, созданного "с нуля" (со всеми нужными
"InsertBreak'ами"), то проблемы нет.
Изображения
Тип файла: jpg СТраницы.jpg (55.0 Кб, 3 просмотров)
DBEER вне форума   Ответить с цитированием
Старый 10.04.2014, 18:02   #2
DBEER
Форумчанин
 
Регистрация: 13.03.2014
Адрес: Киров-Вятка
Сообщений: 72
Репутация: 25
Хорошо Ну, опять же, сам нашел :))

MS Word2003 Это меню [Формат]->[Колонки]:
Колонка 1
Ширина (нужная)
Применить к "выделенным разделам"

VBA:
Код:

    With Selection.PageSetup.TextColumns
        .SetCount NumColumns:=1
        .EvenlySpaced = True
        .LineBetween = False
        .Width = CentimetersToPoints(28.5)
    End With

DBEER вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Форматирование текста по ширине Pro100c00l Помощь студентам 0 22.12.2011 18:05
Подогнать ширину текста по ширине ячейке StringGrid Neko13 Общие вопросы Delphi 8 21.06.2010 10:46
выравнивание столбцов dbgrid по ширине текста kate158 БД в Delphi 2 30.07.2009 17:28
Ширина текста у произвольной канвы AnTe Мультимедиа в Delphi 10 23.06.2009 14:59
выравнивание текста по ширине Алёна Общие вопросы Delphi 6 18.04.2007 11:31


20:36.


Powered by vBulletin® Version 3.8.8 Beta 2
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.

RusProfile.ru


Справочник российских юридических лиц и организаций.
Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru