Отправляет email-рассылки с помощью сервиса Sendsay

Работаем в Office - Word 97/2000/XP/2003: вопросы и решения

Подписаться Бесплатный дискуссионный лист Подписчиков 848
←   Май 2006   →
 1
 2
 3
 4
 5
 6
 7
 8
08.05.2006
22:55:59
22:56:03
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31


За последние 60 дней ни разу не выходила


Сайт листа: http://crimeanhome.com/word/
Открыт: 20-01-2004
Пре-модерация: Да
Адрес для писем в лист: comp.soft.others.word-list@subscribe.ru

Модератор
Doubrovski

Статистика

848 подписчиков
0 за неделю

[Office] как заставить ворд НЕ переносить слова, которыми заканчивается абзац?

Кстати... как заставить Ворд НЕ переносить слова, которыми
заканчивается абзац? А если таких слов действительно МНОГО???

Чтобы не было как здесь: "как заставить Ворд НЕ переносить слова,
которыми заканчивается абзац? А если таких слов действительно МНО-
ГО?"

Ворд запросто переносит последнее слово (в приведенном случае -
"много") в абзаце... как отучить его от этой вредной привычки?

Это 12 сообщение: http://subscribe.ru/archive/comp.soft.others.word/msg/549144
от ilya в дискуссионный лист
<<Конец ответа ------------------------>>
Написать модератору: crimeanho***@m*****.ru
Архив: http://subscribe.ru/archive/comp.soft.others.word
Подписаться:
mailto:comp.soft.others.word-sub@subscribe.ru
Подписчиков: 870; Номер выпуска: 365

Ответить  
ilya
Sun, 14 May 2006 19:26:50 +0400 (#549144)

 

Ответы:

Это делается просто..
Меню Сервис-Язык-Растановка переносов. Просто убрать флаг
"Автоматическая расстановка переносов", который выставляется активно
при установке офиса!!

Это 6 сообщение: http://subscribe.ru/archive/comp.soft.others.word/msg/549160
от Andrey Radievitch в дискуссионный лист
<<Конец ответа ------------------------>>
Написать модератору: crimeanho***@m*****.ru
Архив: http://subscribe.ru/archive/comp.soft.others.word
Подписаться:
mailto:comp.soft.others.word-sub@subscribe.ru
Подписчиков: 870; Номер выпуска: 369

Ответить  
Andrey Radievitch
Mon, 15 May 2006 17:04:02 +0700 (#549160)

 

Уточню вопрос: мне нужно, чтобы ворд переносил слова во всем документе
(более 100 страниц - вручную делать муторно), НО не последние в
абзаце! Чтобы не было таких "заскоков", как две-три буквы, оторванные
от слова, в конце абзаца.

Опять же... вручную отлавливать все концы абзацев - нереально. К тому
же ворд имеет обыкновение в самый неожиданный момент находить новый
способ форматирования абзаца за счет новой расстановки переносов...

Это 16 сообщение: http://subscribe.ru/archive/comp.soft.others.word/msg/549743
от ilya в дискуссионный лист
<<Конец ответа ------------------------>>
Написать модератору: crimeanho***@m*****.ru
Архив: http://subscribe.ru/archive/comp.soft.others.word
Подписаться:
mailto:comp.soft.others.word-sub@subscribe.ru
Подписчиков: 869; Номер выпуска: 378

Ответить  
ilya
Tue, 16 May 2006 10:14:46 +0400 (#549743)

 

On Tue, 16 May 2006 10:14:46 +0400
ilya <ipw@t*****.by> wrote:

IMHO, стандартными средствами ни как.
Однако в ветке уже прозвучали идеи:
1. Вставить неразрывный дефис
2. Сделать его невидимым

Значит пишем макрос (за качество кода прошу не пинать, сие нетленное творение
делалось не шесть дней, а шесть минут. Впрочем недовольные могут прочитать текст
после подписи)

Sub BanHyphenLastWord()
Selection.Find.ClearFormatting
With Selection.Find
.Text = "^p"
.Forward = True
.Wrap = wdFindContinue
End With
Selection.Find.Execute
Selection.MoveLeft Unit:=wdCharacter, Count:=1
Selection.MoveLeft Unit:=wdCharacter, Count:=1
flag_space = 1
While flag_space = 1
Selection.MoveLeft Unit:=wdCharacter, Count:=1
If Selection.Text = " " Then
flag_space = 0
Else
Selection.InsertSymbol CharacterNumber:=30, _
Unicode:=True, Bias:=0
Selection.MoveLeft Unit:=wdCharacter, _
Count:=1, Extend:=wdExtend
Selection.Font.Hidden = True
Selection.MoveLeft Unit:=wdCharacter, Count:=1
End If
Wend

Selection.Find.ClearFormatting
With Selection.Find
.Text = "^p"
.Forward = True
.Wrap = wdFindContinue
End With
Selection.Find.Execute
Selection.MoveRight Unit:=wdCharacter, Count:=1
End Sub

По коду макроса:
1. Ищем конец абзаца.
2. Сдвигаемся с найденного символа (P вывернутое)
3. Передвигаемся на один символ влево
4. До тех пор, пока не найдем пробел вставляем неразрывный дефис и делаем его
невидимым
.. и так по всему последнему слову абзаца.
5. Обработав слово, опять находим конец абзаца (текущего)
6. Перемещаемся в следующий.

Первой строчкой макроса можно настроить так, что-бы поиск шел только в тексте
определенного формата (стиля). Например в основном тексте.
Садим макрос на быструю клавишу и тупо ее жмем, пока не пройдем весь текст.
Все, наверное...

Ответить  
Владимир Ковалев
Wed, 17 May 2006 01:39:17 +0700 (#549901)

 

заканчивается абзац?

Можно использовать неразрывный дефис, он как раз не позволяет перенос

Это 4 сообщение: http://subscribe.ru/archive/comp.soft.others.word/msg/549232
от "Trigubyak Nataly" в дискуссионный лист
<<Конец ответа ------------------------>>
Написать модератору: crimeanho***@m*****.ru
Архив: http://subscribe.ru/archive/comp.soft.others.word
Подписаться:
mailto:comp.soft.others.word-sub@subscribe.ru
Подписчиков: 870; Номер выпуска: 372

Ответить   "Trigubyak Nataly" Mon, 15 May 2006 14:47:56 +0300 (#549232)

 

заканчивается абзац?

Можно использовать неразрывный дефис, он как раз не позволяет перенос

А как сделать неразрывный дефис при этом невидимым??? :)

Это 17 сообщение: http://subscribe.ru/archive/comp.soft.others.word/msg/549744
от ilya в дискуссионный лист
<<Конец ответа ------------------------>>
Написать модератору: crimeanho***@m*****.ru
Архив: http://subscribe.ru/archive/comp.soft.others.word
Подписаться:
mailto:comp.soft.others.word-sub@subscribe.ru
Подписчиков: 869; Номер выпуска: 379

Ответить  
ilya
Tue, 16 May 2006 10:16:00 +0400 (#549744)

 

Сделать формат скрытый для дефиса.:)

Это 5 сообщение: http://subscribe.ru/archive/comp.soft.others.word/msg/549793
от "Trigubyak Nataly" в дискуссионный лист
<<Конец ответа ------------------------>>
Написать модератору: crimeanho***@m*****.ru
Архив: http://subscribe.ru/archive/comp.soft.others.word
Подписаться:
mailto:comp.soft.others.word-sub@subscribe.ru
Подписчиков: 869; Номер выпуска: 383

Ответить   "Trigubyak Nataly" Tue, 16 May 2006 14:51:46 +0300 (#549793)

 

День добрый!

Не знаю, насколько это корректный вариант, но:
1. Расставить переносы по всему тексту (части текста).
Как - читать в хелпе
2. Убрать переносы там где они не нужны (вручную при включенном режиме
отображения непечатных символов или макросом)

Это 3 сообщение: http://subscribe.ru/archive/comp.soft.others.word/msg/549741
от Yaroslav Matsera в дискуссионный лист
<<Конец ответа ------------------------>>
Написать модератору: crimeanho***@m*****.ru
Архив: http://subscribe.ru/archive/comp.soft.others.word
Подписаться:
mailto:comp.soft.others.word-sub@subscribe.ru
Подписчиков: 869; Номер выпуска: 376

Ответить  
Yaroslav Matsera
Mon, 15 May 2006 13:10:10 +0300 (#549741)