Консультация № 171697
28.08.2009, 15:41
0.00 руб.
0 1 1
Подскажите как при помощи ВБА указать объеденить два абзаца 1 и 2
как в таблице Ворда после того как с ней произвели действия указать сделать строку согласно её содержимому, то есть изначально она была одного размера, с неё половину данных убрали, затем надо её уменьшить
как организовать поиск слова "Ф" строго в содержимом закладки "В", какие строки кода отвечают за то, чтобы после нахождения искомого найденное было выделено, каким образом можно организовать при замене, чтобы слово заменённое было вставлено на месте искомого с цветом шрифта например жёлтым. Спасибо Эндрю

Обсуждение

Неизвестный
28.08.2009, 17:07
общий
это ответ
Здравствуйте, Ципихович Эндрю.
Наконец-то у меня появилось время, чтобы ответить.
Что значит объединить два абзаца? Из двух сделать один? Вот так (Удаляем символ с кодом 13 (перевод строки):
Replace(ActiveDocument.Range(ActiveDocument.Paragraphs(1).Range.Start, ActiveDocument.Paragraphs(2).Range.Start).Text, ChrW(13), "")

Автоматически подобрать размер строки таблицы по содержимому невозможно. Это можно делать только для столбцов

Хитрость при поиске в закладке, да и вообще в любом объекте типа Range, связана с тем, что при поиске нужно следить, что найденный фрагмент принадлежит этому диапазону. Чуть позже я напишу, как это можно это реализовать
Параметры текста замены определяются объектом Replacement метода Find: Replacement.Text определяет тест замены, Replacement.Font.Color — цвет шрифта для замены
Форма ответа