Excel ЧаВо

adv-f1.ru

Как изменить атрибуты шрифта части текста в ячейке (цвет, размер, имя)?


Чтобы изменить часть текста ячейки можно воспользоваться свойством Characters объекта Range.

Delphi:

Msg: String; ... Msg := ' Человек собаке друг J'; // занесем тест в ячейку

ASheet.Range['B3', EmptyParam].Formula := Msg; // займемся последним символом - изменим атрибуты шрифта

ASheet.Range['B3', EmptyParam].Characters[Length(Msg), 1].Font.Name := 'Wingdings'; ASheet.Range['B3', EmptyParam].Characters[Length(Msg), 1].Font.Size := 24; ASheet.Range['B3', EmptyParam].Characters[Length(Msg), 1].Font.Color := clBlue;

Characters Property



Содержание раздела