Теперь пора объединить все наши знания. Вот код установки реквизитов:

Процедура ПриВыбореСчета() 
Перем х;
х=ВыбранныйСчет.КоличествоСубконто();  
Если х>0 тогда 
	Форма.Субконто1.НазначитьТип(ВыбранныйСчет.ВидСубконто(1));
КонецЕсли;	
Если х>1 тогда 
	Форма.Субконто2.НазначитьТип(ВыбранныйСчет.ВидСубконто(2));
КонецЕсли;	
Если х>2 тогда 
	Форма.Субконто3.НазначитьТип(ВыбранныйСчет.ВидСубконто(3));	
КонецЕсли;	

КонецПроцедуры

При работе следует обратить внимание, что виды субконто устаналиваются именно для одной строки, а не для всей таблицы. Это легко проверить. Введите несколько строк.

Потом выберите счет.

И теперь в данной строке Вы сможете выбрать субконто сотвествующее данному счету.

Но только для данной строки. Это не плохо, для ряда задач даже очень хорошо. Если нужно установить для всех строк, то по ним можно и пробежаться.