Как найти текст, любого цвета, кроме чёрного?

Программирование на Visual Basic for Applications
Кукша12
Новичок
Новичок
 
Сообщения: 47
Зарегистрирован: 09.08.2006 (Ср) 16:43

Как найти текст, любого цвета, кроме чёрного?

Сообщение Кукша12 » 09.08.2006 (Ср) 16:47

При написании макроса для MS Word, нужно выяснить, есть ли в документе текст любого цвета, кроме чёрного. То же самое с цветом фона текста (цветная подсветка букв - "Выделение цветом")
Как это сделать?

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 09.08.2006 (Ср) 20:10

Заставить объект .find найти весь чёрный текст. Если найденный диапазон не совпадает со всем документом, в документе есть текст любого цвета, кроме чёрного...
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

Кукша12
Новичок
Новичок
 
Сообщения: 47
Зарегистрирован: 09.08.2006 (Ср) 16:43

Сообщение Кукша12 » 10.08.2006 (Чт) 12:16

гм, ну в общем ясно что надо. Но, как это сделать?

RayShade
Scarmarked
Scarmarked
Аватара пользователя
 
Сообщения: 5511
Зарегистрирован: 02.12.2002 (Пн) 17:11
Откуда: Russia, Saint-Petersburg

Сообщение RayShade » 10.08.2006 (Чт) 12:22

У помянутого объекта .find есть такой штук, как .format его надо поставить true.

А потом уже, через .paragraphformat и .font настроить его на поиск нужного цвета на нужном фоне.

Кукша12
Новичок
Новичок
 
Сообщения: 47
Зарегистрирован: 09.08.2006 (Ср) 16:43

Сообщение Кукша12 » 10.08.2006 (Чт) 12:28

понял, спасибо - про всё поотдельности знал, а вот свести всё вместе соображалки не хватало :)


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 47

    TopList