[Dandilion]

Фрагмент кода
=========================================

Книга = Эксель.WorkBooks.Open(файл); 
Лист = Книга.WorkSheets(1); 
НачатьТранзакцию(); 
кво = 0; 
СпрТМЦ = СоздатьОбъект("Справочник.ТМЦ"); 
Для н=ССтр По ПоСтр Цикл 
[indent]Артикул = СокрЛП(Строка(Лист.Cells(н, КолАртикул).Value)); 
Если ПустоеЗначение(Артикул) = 1 Тогда 
[indent]Сообщить("Строка " + н + " Артикул пустой!!!"); 
Продолжить;[/indent] 
КонецЕсли; 
Если СпрТМЦ.НайтиПоРеквизиту("Артикул",Артикул,1) = 1 Тогда 
[indent]Если СпрТМЦ.ВыбратьЭлементы() = 1 Тогда 
[indent]СпрТМЦ.ТекущийЭлемент(); 
УКТ1 = СокрЛП(Строка(Лист.Cells(н, КолЦена).Value)); 
СпрТМЦ.УстановитьАтрибут("УКТ", УКТ1); 
СпрТМЦ.Записать(); 
Сообщить("Товар с артикулом " + Артикул + " -- Добавлен"); 
кво = кво + 1;[/indent] 
КонецЕсли; 
Иначе 
Сообщить("Товар с артикулом " + Артикул + " -- Ненайден"); [/indent]
КонецЕсли; [/indent]
КонецЦикла; 
ЗафиксироватьТранзакцию();

=========================================
Что видно в Отладчике
УКТ1 - нормально загружается и меняется с переходом по строкам
СпрТМЦ.УКТ - пустота, ничего не записывается. Реквизит не периодический. Тип Строка.
не могу понять почему даже в отладчите коменда
СпрТМЦ.УстановитьАтрибут("УКТ", УКТ1);
не выдает никакого значения

Сообщение отредактировал MATEVI - 12.12.11, 11:38

Причина редактирования: Выделяйте код. Прочтите правила!

[Ardi]

Если СпрТМЦ.НайтиПоРеквизиту("Артикул",Артикул,1) = 1 Тогда 
Если СпрТМЦ.ВыбратьЭлементы() = 1 Тогда

это бред.

СпрТМЦ.ТекущийЭлемент();

это бред.

Вот поэтому и не работает.

закомментироваь

Если СпрТМЦ.ВыбратьЭлементы() = 1 Тогда 
СпрТМЦ.ТекущийЭлемент();

[Dandilion]

Если СпрТМЦ.НайтиПоРеквизиту("Артикул",Артикул,1) = 1 Тогда 
Если СпрТМЦ.ВыбратьЭлементы() = 1 Тогда

это бред.

СпрТМЦ.ТекущийЭлемент();

это бред.

Вот поэтому и не работает.

закомментироваь

Если СпрТМЦ.ВыбратьЭлементы() = 1 Тогда 
СпрТМЦ.ТекущийЭлемент();

СПАСИБО! Сам теперь понимаю, что бред )) Первые шаги в 1С... пока только начинаю разбиратся