0
snegovik
29.06.12
✎
07:08
|
В табличной части документа содержится порядка сотни реквизитов, у которых на самом деле всего 4-5 названий, но различаются хвостиком на конце в виде цифры: ПервыйВидВремени1, ПервыйВидВремени2, ПервыйВидВремени3 и так далее. В коде хочу прибавлять этот хвост автоматом, через цикл, а не писать всё вручную, однако так не срабатывает. Подскажите конструкцию, пожалуйста, как правильно написать в последней строчке?:-)
НоваяСтрока = ТекДок.ОтработанноеВремя.Добавить();
Для j = 4 по 18 Цикл
ТекПеременнаяПервыйВидВремени = "ПервыйВидВремени" + Строка(j - 3);
Если СокрЛП(Лист.Cells(i, j).Value) = "Я" Тогда
НоваяСтрока.ТекПеременнаяПервыйВидВремени = Справочники.КлассификаторИспользованияРабочегоВремени.Работа;
|
|