7.7 Цвет ячеек таблицы

Написал условие для установки цвета указанной ячейки, но при выводе в любом случае
ячейка будет одного цвета,

Код:

Сч=1;
ВыбратьСтроки();

Пока ПолучитьСтроку()=1 Цикл

Сек = Таб.ПолучитьСекцию("Сотр");
Если пустоезначение("Д1")=0 тогда
обл=Сек.область("R1C5");
обл.ЦветФона(180,180,180);// етот цвет устанавливается 
ИначеЕсли  пустоезначение("Д1")=1 тогда // а при етом условии цвет такой же как и в 
обл.ЦветФона(255,255,255);         //  первом - обл.ЦветФона(180,180,180);
КонецЕсли;

Если пустоезначение("Н1")=0 тогда
обл2=Сек.область("R2C5");
обл2.ЦветФона(0,0,0);
ИначеЕсли пустоезначение("Н1")=1 тогда
обл2.ЦветФона(255,255,255);
КонецЕсли;


Таб.Вывестисекцию(сек);

сч=сч+1;
КонецЦикла;

Д1 , Н1 - реквизиты табл. части (число)

так вообще нет результата

Смысл в том, что при получении каждой новой строки цвет ячейки окрашивается в определенный цвет, поетому закраска происходит в цикле, ведь неясно ско-ко будет секций выведено.
А результатом будет график дежурств

может нуевонафик эти раскрашивания в цикле? просто сделать три одинаковые строки с разным цветом и выводить нужную строку при определенном условии? %)
P.S. я бы делал так, потому что не очень хочется разбираться во всех этих выделениях, цветах фона.. Хотя если очень уж надо могу попробовать посмотреть твой код внимательнее..(

Алгоритм:

1 - добавление в тз сотрудников, и заполнение их дежурства(1-выход, 0 - невыход)
2 - цикл вывода в таблицу, тоесть неопределенное кол.людей,
(секция ("сотр") - ето две строки)
3 - для каждой выведенной секции окрашиваются ячейки в зависимости от (1)

Угодник, на ответ нажал видимо после твоего сообщения
все верно сказал

Сделал так, но вот загвоздка, если

Код:

НомСтр=НомСтр+1;
Таб.Вывестисекцию(сек);    
обл=Таб.область("R"+НомСтр+"C5");
Если НашеУсловие тогда            
обл.ЦветФона(180,180,180);
Иначе
обл.ЦветФона(255,255,255);         
КонецЕсли;

тогда раскрашивается одна ячейка во 2 строке р.5 одним цветом при любом условии

а если

Код:

обл=сек.область("R"+НомСтр+"C5");

тогда не пашет
Возможно секцию нужно определить по-другому

Код:

Сек = Таб.ПолучитьСекцию("сотр");

а может определить секцию раскр. как перекрестную и так выводить?

проблема в том что мне бы надо определить область секции, а ето невозможно
А отладчик в первой же строке клинит

Код:

Таб = СоздатьОбъект("Таблица");

в отладчике определите точку останова и когда до нее дотопает жмите F8.
Если "Наше условие" это "Если пустоезначение("Д1")=0 " то понятное дело, что оно никогда не будет пустым, потому что "Д1" это текст
WaRDeR зришь в корень

Д1 - идентефикатор,Н1...

кавычками обозначают текстовую константу