Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Установить определенный цвет выделения текста. / 6 сообщений из 6, страница 1 из 1
02.10.2013, 14:51
    #38414345
lopuxi
lopuxi
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Установить определенный цвет выделения текста.
Подскажите пожалуйста, что в этом коде, отвечает за выделение цветом которым будет выделяться слово? И как сделать так, что бы, цвет задавался в коде и запуск данного макроса всегда выделял слово зеленым?

Спасибо.

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
[CSV][CSV]Sub selectWord()
'Подсвечивание зеленым цветом найденное слово
Dim rTmp As Range
Set rTmp = ActiveDocument.Range
With rTmp.Find
.Text = Selection.Text
.Replacement.Text = ""
.Replacement.Highlight = True
.Execute Replace:=wdReplaceAll
End With
End Sub[/CSV][/CSV]
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.10.2013, 14:58
    #38414359
Прогер_самоучка
Прогер_самоучка
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Установить определенный цвет выделения текста.
lopuxiПодскажите пожалуйста, что в этом коде, отвечает за выделение цветом которым будет выделяться слово?
Код: vbnet
1.
.Replacement.Highlight = True



Написано же... Highlight дословный перевод -"выделение"
Вас в гугле забанили?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.10.2013, 15:13
    #38414397
lopuxi
lopuxi
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Установить определенный цвет выделения текста.
Прогер_самоучка, и тебе привет.

Как в данной строчке указать точный цвет, которым он будет закрашивать?
В данный момент я могу выбрать на панели ворда любой цвет. И этим цветом будет закрашиваться слово. Конечно и так можно, но возможно можно взять и указать единый цвет.
Спасибо. Гугл мне с моей проблемой не помог. Я там был, с человеком общаться проще.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.10.2013, 15:16
    #38414401
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Установить определенный цвет выделения текста.
lopuxiИ как сделать так, что бы, цвет задавался в коде
Код: vbnet
1.
Options.DefaultHighlightColorIndex = wdBrightGreen

запись макроса тебе в помощь
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.10.2013, 15:40
    #38414452
Прогер_самоучка
Прогер_самоучка
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Установить определенный цвет выделения текста.
lopuxiПрогер_самоучка, и тебе привет.
Приветствую)
lopuxiКак в данной строчке указать точный цвет, которым он будет закрашивать?
В данный момент я могу выбрать на панели ворда любой цвет. И этим цветом будет закрашиваться слово. Конечно и так можно, но возможно можно взять и указать единый цвет.
Спасибо. Гугл мне с моей проблемой не помог. Я там был, с человеком общаться проще.
Если не ошибаюсь, то так:
Код: vbnet
1.
Selection.Find.Replacement.Font.Color = wdColorGreen


в вашем тексте будет выглядеть так:
Код: vbnet
1.
.Font.Color = wdColorGreen
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
02.10.2013, 15:58
    #38414503
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Установить определенный цвет выделения текста.
Прогер_самоучкаЕсли не ошибаюсьошибаешься. Цвет шрифта и цвет подсветки - это не одно и то же.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Установить определенный цвет выделения текста. / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]