Загрузка из Excel

[xDee]

И вываливает с ошибкой что не указан владелец и спозиционированн на первой строке прайса

[sergejK74]

Код Выделить Развернуть

СпрНом.ВидНоменклатуры=Перечисление.ВидыНоменклатуры.Прочее;
КонецЕсли;
СпрНом.Записать();
КонецЕсли наверное следует ниже перенести, куда нибудь перед

Код Выделить Развернуть

КонецЦикла;
КонецЦикла;

[xDee]

Еще один вопрос если позволите, как спозиционироваться на колонке и строке в Excel ? Мне нужно взять  внутрений курс валюты которая находится в колонке H строка 4

[sergejK74]

Так же как ты получал значения до этого
например

Код Выделить Развернуть

Курс = xlApp.Cells(4,8).Value
или

Код Выделить Развернуть

xlApp.Range("H4").Select();
Курс = СокрЛП(xlApp.ActiveCell.FormulaR1C1);

[xDee]

Отбираю Типы цен номенклатуры их шесть, подскажите как сделать элегантней чтобы не создавать для каждого типа СоздатьОбъект("Справочник.ТипыЦен"), может можно сразу присвоить значения всем типам цен перебрав их по коду ? Сейчас у меня вот так:

Код Выделить Развернуть

СпрЦен =СоздатьОбъект("Справочник.ТипыЦен");
Если СпрЦен.НайтиПоКоду("00004") = 1 Тогда
дРознТипЦен= СпрЦен.ТекущийЭлемент();
иначе
Сообщить("Нет в справочнике Розничных типов цен"); 
КонецЕсли;

[xDee]

Пардон ступил, все сделал