Код

гРасширениеФормы = СоздатьОбъект(РасширениеФормы);
гРасширениеФормы.ДобавитьАтрибут("ТЗ", 15); 

Код

Перем гРасширениеФормы,гАтрФормы;
ПриОткрытии()
гРасширениеФормы = СоздатьОбъект("РасширениеФормы");
гАтрФормы = СоздатьОбъект("АтрибутФормы");
ф_ТЗ. НоваяКолонка("ТЗ","ТаблицаЗначений");          \\ Первые три колонки стандартно для Дерева+Таблица
ф_ТЗ. НоваяКолонка("номпикт","Число");
ф_ТЗ. НоваяКолонка("назв","Строка");
ф_ТЗ. НоваяКолонка("пикт","Число");
ф_ТЗ. НоваяКолонка("тп","Число");
ф_ТЗ. НоваяКолонка("дл","Число");
ф_ТЗ.ВидимостьКолонки("дл",1,1)  // не работатет, т.е. отображаеться последней.... хотя видимость,например, срабатывает: ф_ТЗ.ВидимостьКолонки("дл",0)
Ф_ТЗ.НоваяСтрока();
.......
КонецПроцедуры

Процедура 	ПослеСозданияФормы()
	гРасширениеФормы.Максимизирована = 1;
	гАтрФормы.УстановитьАтрибут(Форма,"ф_ТЗ");
	гАтрФормы.ПерехватитьТаблицуЗначений();
КонецПроцедуры 

Код

Функция СформироватьДерево()
   ТЗ = СоздатьОбъект("ТаблицаЗначений");
   ТЗ.НоваяКолонка=("ТЗ","ТаблицаЗначений");
   ТЗ.НоваяКолонка=("Номпикт","Число");
   ТЗ.НоваяКолонка=("Наименование","Строка");
   ТЗ.НоваяКолонка=("Мояколонка1");
   ТЗ.НоваяКолонка=("Мояколонка2");
   ТЗ.НоваяСтрока();
   ТЗ.ТЗ=СоздатьОбъект("ТаблицаЗначений");
   ТЗ.ТЗ.НоваяКолонка=("ТЗ","ТаблицаЗначений");
   ТЗ.ТЗ.НоваяКолонка=("Номпикт","Число");
   ТЗ.ТЗ.НоваяКолонка=("Наименование","Строка");
   ТЗ.ТЗ.НоваяКолонка=("Мояколонка1");
   ТЗ.ТЗ.НоваяКолонка=("Мояколонка2");
   ТЗ.ТЗ.НоваяСтрока();
   ТЗ.ТЗ.ТЗ=СоздатьОбъект("ТаблицаЗначений");
   ТЗ.ТЗ.ТЗ.НоваяКолонка=("ТЗ","ТаблицаЗначений");
   ТЗ.ТЗ.ТЗ.НоваяКолонка=("Номпикт","Число");
   ТЗ.ТЗ.ТЗ.НоваяКолонка=("Наименование","Строка");
   ТЗ.ТЗ.ТЗ.НоваяКолонка=("Мояколонка1");
   ТЗ.ТЗ.ТЗ.НоваяКолонка=("Мояколонка2");
Возврат ""
КонецФункции 

Код

Перем СтрТЗ, СЗ_ШаблонДерева,
Функция СформироватьДерево()
	Для йй=1 по СЗ_ШаблонДерева.РазмерСписка() Цикл
		Шаблон("["+СтрТЗ+".НоваяКолонка("+СЗ_ШаблонДерева.Получитьзначение(йй)+")]");
	КонецЦикла;
	Возврат "";
КонецФункции

Функция ШаблонДерева()
	СЗ_ШаблонДерева = СоздатьОбъект("СписокЗначений");
	СЗ_ШаблонДерева.ДобавитьЗначение("""ТЗ"",""ТаблицаЗначений""");
	СЗ_ШаблонДерева.ДобавитьЗначение("""номпикт"",""Число""");
	СЗ_ШаблонДерева.ДобавитьЗначение("""Наименование"",""Строка""");
	СЗ_ШаблонДерева.ДобавитьЗначение("""Мояколонка1""");
	СЗ_ШаблонДерева.ДобавитьЗначение("""МояКолонка2""");
	ТЗ = СоздатьОбъект("ТаблицаЗначений");
	СтрТЗ  = "ТЗ";
	СформироватьДерево();
	ТЗ.НоваяСтрока();
	ТЗ.ТЗ = СоздатьОбъект("ТаблицаЗначений");
	СтрТЗ = СтрТЗ + ".ТЗ";
	СформироватьДерево();
	ТЗ.ТЗ.НоваяСтрока();
	ТЗ.ТЗ.ТЗ = СоздатьОбъект("ТаблицаЗначений");
	СтрТЗ = СтрТЗ + ".ТЗ";
	СформироватьДерево();
	Возврат "";
КонецФункции 

Код

А чем тебя неустраивает такое?
Перем Структура,Дерево;

Процедура Сформировать()
Для н=1 по 10 цикл
ТЗ_Тов.НоваяСтрока();
ТЗ_Тов.Ветка=ЗначениеИзСтроки(Структура);
лВетка=ТЗ_Тов.Ветка;
ТЗ_Тов.ИмяВетки="Группа "+строка(н);
Для ном=1 по 10 цикл
лВетка.НоваяСтрока();
лВетка.ИмяВетки="Строка "+строка(ном);
КонецЦикла
КонецЦикла
Дерево.ОбновитьДерево();
КонецПроцедуры

Процедура ПослеОткрытия()
Дерево=СоздатьОбъект("АтрибутФормы")
Дерево.УстановитьАтрибут(Форма,"ТЗ_Тов");
ДеревоПерехватитьТаблицуЗначений();
Дерево.ОбновитьДерево();
КонецПроцедуры

ТЗ_Тов.НоваяКолонка("Ветка");
ТЗ_Тов.НоваяКолонка("зн");
ТЗ_Тов.НоваяКолонка("ИмяВетки");
Структура=ЗначениеВСтрокуВнутр(ТЗ_Тов);