Рез = Таб.ЗначениеТекущейЯчейки("R1C1");
Если Рез < 0 Тогда
Секция = Таб.ПолучитьСекцию("Строка");
Секция.Область("Товар").ЦветТекста(225,225,225); // Область("R1C1:R2C2")
КонецЕсли;
Секция = Таб.ПолучитьСекцию("Строка");
Сумма = ПолучитьСумму(Запрос);
Если Сумма < 0 Тогда
Секция.Область("Товар").ЦветТекста(225,225,225); // Область("R1C1:R2C2")
КонецЕсли;
Таб.ВывестиСекцию(Секция);
врЯчейка = Таблица.Область(<R1>,<C1>,<R2>,<C2>);
врЯчейка.ЦветТекста(<R>,<G>,<B>);