Как переключить цвет выделенного цвета в желтый для текста, который будет набран в Word 2007?

Question

В VBA-MACRO в MS Word 2007 я хочу переключить текст подсветка цвета для желтого цвета для текста, который будет набран дальше на позиции курсора.

Если я хочу изменить цвет выбранного текста в настоящее время, я могу сделать это с Selection.Range.HighlightColorIndex = wdYellow

Но это, кажется, только работает, если текст уже существует и выбран. Могу ли я также установить цвет подсветки для желтого для текста, который будет вставлен на положение курсора?

(e. g. Если я нажму на кнопку «жирный шрифт», все будущие текст будут смелыми, Но это, похоже, не работает с функцией Highlight, или есть ли способ сделать это?)

Answer 1

Весь будущий текст будет смелым

Нет, это не будет.Нажав «bold», вы отмечаете текущую точку в тексте жирным шрифтом, и если вы продолжаете ввести с этого момента, текст будет смелым, потому что он набирается из живого места, не потому, что кнопка нажата.Если вы нажмете bold, переместите CARET на некоторое другое место и введите, это не будет жирным.

Правильный способ - вставить текст и применить форматирование в свой диапазон.

Dim r As Range
Set r = Selection.Range

r.Collapse wdCollapseStart
r.InsertAfter "Text to insert"
r.HighlightColorIndex = wdYellow

.