Можно ли сделать многоцветный текст в ячейке Excel?

Question

У меня есть строка strInfo, которая содержит «Employee John Maybach».

Как сделать часть «Employee» черным текстом, а часть «John Maybach» красной?

Часть «Сотрудник» всегда будет оставаться постоянной, но часть имени сотрудника изменится так, что это может быть имя из 2 частей (Джон Доу), или имя из 3 частей (Джон Аллен Доу), или просто имя (Джон).

Я хочу, чтобы слово «Сотрудник» всегда было черным, а остальная часть текста в ячейке, часть имени, была красной.Это возможно?

Answer 1

Макро рекордер твой друг:

Dim fixedLength As Long
fixedLength = Len("Employee")
ActiveCell.FormulaR1C1 = "Employee Some Employee"
With ActiveCell.Characters(Start:=fixedLength + 2, Length:=Len(ActiveCell) - fixedLength - 1).Font
    .Color = vbRed
End With