Как узнать, сколько у счета субконто, и перебрать их?

КоличествоСубконто()
ВидСубконто()

Или тебе нужны итоги по субконто?

Если СчетПоКоду(ТекСчет).КоличествоСубконто()>=1 Тогда    
Для Инд=1 По СчетПоКоду(ТекСчет).КоличествоСубконто() Цикл
БухИт.ИспользоватьСубконто(ВидыСубконто+"."+СчетПоКоду(ТекСчет).ВидСубконто(Инд),,1,);  
//Сообщить(""+"ВидыСубконто."+СчетПоКоду(ТекСчет).ВидСубконто(Инд));
КонецЦикла;

Опс, народ. В 8.0
В 7.7 я и сам знаю.

Счет.ВидыСубконто.Количество()