![]() |
#1 |
Участник
|
При експорте в Ворд необходимо чтобы текст который выводится был подкрашен (либо фон либо текст).
Макрос в Visual Basic показывает что при окрашиваниии выделеного текста выполняется функция: Selection.Range.HighlightColorIndex = wdRed также он показывает что wdRed соответствует индекс 6. В навике пишу: wdSelection.Range.HighlightColorIndex := 6; Но эта строчка не приводит абсолютно ни к каким изменениям, хотя и ошибки тоже не вызывает. Подскажите пожалуйста где здесь ошибка, или каким еще образом можно изменить цвет текста или заливку. |
|
![]() |
#2 |
Moderator
|
Видимо Selection никак не определен.
wdRange := wd.ActiveDocument.Range; wdRange.HighlightColorIndex := 6; |
|
![]() |
#3 |
Участник
|
Да вробе бы определен.
Есть строка которая выводит непосредственно текст wdSelection.TypeText(FORMAT('!!!')); Дальше я дописал строки wdRange := wdSelection.Range; Message(FORMAT(wdRange.HighlightColorIndex) wdRange.HighlightColorIndex(6); Message(FORMAT(wdRange.HighlightColorIndex) И причем оба мэседжа возвращают 0 |
|
![]() |
#4 |
Administrator
|
там может быть засада следующего плана: попробуйте сначала красить, а потом выводить. у нас именно так с Excel работает
|
|