Что-то туплю, вообще это сработает?
   ВыбратьСтроки();
   Пока ПолучитьСтроку() = 1 Цикл            
       УстановитьРеквизитСправочника(НазначениеИспользования,"СчетЗатрат",СчетЗатрат,ДатаДок);  
                   
       Для А = 1 По 3 Цикл
           НазначениеИспользования.НазначитьТип("Субконто"+А,СчетЗатрат.ВидСубконто(А));
       КонецЦикла;
       
       УстановитьРеквизитСправочника(НазначениеИспользования,"Субконто1", Субконто1,ДатаДок);
       УстановитьРеквизитСправочника(НазначениеИспользования,"Субконто2", Субконто2,ДатаДок);
       УстановитьРеквизитСправочника(НазначениеИспользования,"Субконто3", Субконто3,ДатаДок);
   КонецЦикла;    

Небольшая доработка, счет затрат и аналитика в назначении использования понадобилось сделать периодическими. Сваял документа смены счета затрат и субконто для списка спецодежды.  Теперь в модуле надо установить значения.

делал через объект справчоника (НайтиЭлемент), такая же фигня. Тип не устанавливает.

(0) не помню уже, но достаточно вроде указать ВСЕ параметры метода УстановитьРеквизитСправочника и усё

(2) гуд, спасибо. Долго бы колупался
       УстановитьРеквизитСправочника(НазначениеИспользования,"Субконто1", Субконто1,ДатаДок,СчетЗатрат.ВидСубконто(1));
       УстановитьРеквизитСправочника(НазначениеИспользования,"Субконто2", Субконто2,ДатаДок,СчетЗатрат.ВидСубконто(2));
       УстановитьРеквизитСправочника(НазначениеИспользования,"Субконто3", Субконто3,ДатаДок,СчетЗатрат.ВидСубконто(3));

так работает