Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

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

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

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 07.03.2010, 13:01   #1
Вахтанг
Новичок
Джуниор
 
Регистрация: 07.03.2010
Сообщений: 6
По умолчанию в Worde выровнять текст по ширине пробелами

Доброго времени суток господа. Очень нужна квалифицированная помощь программиста VBA. Необходимо в Worde выровнять текст по ширине исключительно при помощи пробелов, причем пробелы должны располагаться равномерно в предложениях. Как это делал DOS-овский лексикон. Длина каждого предложения не должна превышать 66 символов. Переносы можно не ставить. Буду очень признателен, если поможете написать макрос. С уважением.
Вахтанг вне форума Ответить с цитированием
Старый 07.03.2010, 14:39   #2
viter.alex
Балуюсь кодами
Участник клуба
 
Аватар для viter.alex
 
Регистрация: 09.01.2009
Сообщений: 1,837
По умолчанию

Цитата:
Сообщение от Вахтанг Посмотреть сообщение
…Длина каждого предложения не должна превышать 66 символов…
Предложения или строки?
Лучше день потерять — потом за пять минут долететь!©
viter.alex вне форума Ответить с цитированием
Старый 07.03.2010, 15:59   #3
Вахтанг
Новичок
Джуниор
 
Регистрация: 07.03.2010
Сообщений: 6
По умолчанию

Каждой строки в абзаце.
Вахтанг вне форума Ответить с цитированием
Старый 07.03.2010, 16:02   #4
Вахтанг
Новичок
Джуниор
 
Регистрация: 07.03.2010
Сообщений: 6
По умолчанию

Суть в том, чтобы реализовать в Worde форматирование DOSовского текстогого редактора.
Вахтанг вне форума Ответить с цитированием
Старый 07.03.2010, 16:09   #5
viter.alex
Балуюсь кодами
Участник клуба
 
Аватар для viter.alex
 
Регистрация: 09.01.2009
Сообщений: 1,837
По умолчанию

Я понимаю в чём суть, проблема в алгоритме, как всегда
Лучше день потерять — потом за пять минут долететь!©
viter.alex вне форума Ответить с цитированием
Старый 07.03.2010, 16:18   #6
Вахтанг
Новичок
Джуниор
 
Регистрация: 07.03.2010
Сообщений: 6
По умолчанию

Буду очень признателен, если поможешь. Сам уже голову сломал. Очень нужно по работе.
Вахтанг вне форума Ответить с цитированием
Старый 07.03.2010, 17:32   #7
viter.alex
Балуюсь кодами
Участник клуба
 
Аватар для viter.alex
 
Регистрация: 09.01.2009
Сообщений: 1,837
По умолчанию

Я так понимаю, что нужно потом этот текст перевести в txt?
Лучше день потерять — потом за пять минут долететь!©
viter.alex вне форума Ответить с цитированием
Старый 07.03.2010, 17:51   #8
Вахтанг
Новичок
Джуниор
 
Регистрация: 07.03.2010
Сообщений: 6
По умолчанию

Да, все правильно в txt. Но делать надо именно из ворда. Поскольку все остальные мкросы реализованы там.
Вахтанг вне форума Ответить с цитированием
Старый 08.03.2010, 01:16   #9
viter.alex
Балуюсь кодами
Участник клуба
 
Аватар для viter.alex
 
Регистрация: 09.01.2009
Сообщений: 1,837
По умолчанию

Черновой вариант макроса готов. В приложении исходный документ и текстовый файл, получаемый моим макросом.
Готов допилять его до Ваших требований за умеренное вознаграждение.
Вложения
Тип файла: txt Коллекции на вкладке.txt (3.5 Кб, 146 просмотров)
Тип файла: doc Выравнивание по ширине пробелами.doc (40.5 Кб, 30 просмотров)
Лучше день потерять — потом за пять минут долететь!©
viter.alex вне форума Ответить с цитированием
Старый 09.03.2010, 23:23   #10
Sasha_Smirnov
Особый статус
Участник клуба
 
Аватар для Sasha_Smirnov
 
Регистрация: 24.11.2008
Сообщений: 1,535
По умолчанию

Ах вот как Трудовой кодекс пишут! Как-то смотрел на сайте — удивился, что это ещё применяется.
Sasha_Smirnov вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Растянуть текст по ширине в PowerPoint RIO Microsoft Office Word 1 06.03.2010 23:40
Управление печатью в Worde Busine2009 Общие вопросы Delphi 0 04.06.2009 20:18
Как в Worde, но без Word VladimirVB Общие вопросы Delphi 2 21.04.2009 00:52
Как растянуть текст по ширине слоя shass HTML и CSS 5 01.03.2009 02:43
текст в richedit по ширине *Devil* Компоненты Delphi 1 15.06.2007 16:27