Статьи из блога
Замена знаков абзаца на пробелы в выделенном тексте
Игорь задал вопрос:
Как удалить все знаки абзацев в выделеном тексте одной кнопкой?
Воспользуйтесь следующим макросом, но для начала выделите нужный фрагмент текста, а потом уже примените макрос:
Sub test23042008() 'Замена знака абзаца в выделенном тексте на пробел With Selection.Find .ClearFormatting .Replacement.ClearFormatting .Text = "^p" 'искомый знак абзаца .Format = False .Replacement.Text = "^s" 'заменяем на неразрывный пробел .Forward = True .Wrap = wdFindStop .Execute Replace:=wdReplaceAll End With Selection.Collapse direction:=wdCollapseStart 'снимаем выделение End Sub
Если вы не знаете, как подключить к документу и применить этот макрос, изучите следующие заметки с сайта:
Создание макроса из готового кода
Рубрика: Вопрос-Ответ, Макросы, Стили и форматирование
Метки: макросы | поиск и замена | форматирование
Просмотров: 39287
Подписаться на комментарии по RSS
Версия для печати
Метки: макросы | поиск и замена | форматирование
Просмотров: 39287
Подписаться на комментарии по RSS
Версия для печати
Еще записи по вопросам использования Microsoft Word:
- 10 вопросов и ответов по редактору Word (1 часть)
- 3 способа очистки списка недавно открытых документов
- Word 2007: добавляем свою вкладку и свои команды
- Word 2007: полотно, рисунки, линии
- Word 2007: смена формата сохранения файла
- Word 97 - решение проблемы с отображением символов на линейке
- Word 97. Слияние документов как один из способов упростить свою работу
- Абзац с цветным фоном
- Автозаполняемые колонтитулы
- Автоматизация текстового набора в Word
- Автоматическая запись макроса
- Автоматическая нумерация билетов
- Автоматическая расстановка переносов
- Автоматическое обновление полей при открытии документа
- Автоматическое сохранение документа при его закрытии
- Автотекст с последовательной нумерацией
- Автоформат документов
- Белый текст на синем фоне в Word 2007
- Буквица
- Быстрая смена ориентации страниц документа
- Быстрое изменение стиля форматирования текста
- Быстрое перемещение между открытыми документами Word
- Быстрое создание нового документа на основе шаблона
- Быстрое удаление границ у таблицы
- Быстрый ввод текста с помощью команды =rand()
Комментариев: 8
используй в окне "Найти и заменить" конструкцию "^w".
В макросе она тоже работает: находит "пробельное" пространство.
Заменяешь везде это "^w" на " " (один пробел), и тут же ещё 2 замены:
знаки абзаца (^p) и разрыва строки (^l), за которыми следует пробел, на то же, но без пробела.
Проще всего, правка - заменить, ^p на пробел, и все!
Мучался 3 часа, чтобы текст из таблицы преобразовать в единый абзац. Справился благодаря Роману и гуру, спасибо большое!!!!
Спасибо Большое!!!!
Большое спасибо за макрос! Очень помог!!!
Дякую розумним людям! Слухайте, - це я б 3 години сиділа!!! Добра вам і процвітання))
Спасибо Гуру! Зачем макросы, когда все намного проще.
Спасибо огромное! Простая замена не работала со знаками подстановки, просто ничего не находило. С этим макросом очень удобно форматировать текст, а главное что он на 100% работает.