Нужен макрос на VB чтобы в Ворде удалял лишние пробелы [Версия для КПК]

Показать полную графическую версию : Нужен макрос на VB чтобы в Ворде удалял лишние пробелы

Leon71

20-07-2003, 08:44

Мне нужен макрос удаляющий лишние пробелы в Ворде. Помогите написать. Может есть примеры. Или у кого есть готовый. Сам на VB не пишу.

Guest

24-07-2003, 20:32

примерно так:
With ActiveDocument.Content.Find
* *.ClearFormatting
* *.Replacement.ClearFormatting
* *.Text = " *"
* *.Replacement.Text = ""
* *.Execute Replace:=wdReplaceAll
End With
по-моему должно работать

XXXX Pro

28-07-2003, 02:26

В Word есть такая возможность: "записать макрос" (где-то в меню) - ты выполняешь какие-то действия, а Word сам кодирует  их в виде VBScript.
Поэтому сделай так: включи запись макроса, а дальше "Правка/Заменить", укажи искать два пробела "  " и заменять на один " ", и сделай глобальную замену. После этого выключи запись макроса и он будет готов.