Необходимо записать из файла Excel, имеющего 2 колонки(артикул справочника номенклатура, дополнительный код ТТКод ) в поле формы справочника Номенклатура каким-то образом ТТКод. Где может быть ошибка? Вот пример кода обработки:

Процедура КнопкаВыполнитьНажатие(Файл, Excel)
//Сообщить(ИмяФайла);
ExcelПриложение = Новый COMОбъект("Excel.Application");
ExcelФайл = ExcelПриложение.WorkBooks.Open(ИмяФайла);
Sheet =ExcelФайл.Sheets(1);

НомерСтроки = 1;
Пока НомерСтроки < 5340 Цикл
НомерСтроки = НомерСтроки +1;
Артикул = Sheet.Cells(НомерСтроки, 1).Value;
ТТКод = Sheet.Cells(НомерСтроки, 2).Value;

СсылкаТТКод = Справочники.Номенклатура.НайтиПоРеквизиту("Артикул",ТТКод);
Если не Справочники.Номенклатура.НайтиПоРеквизиту("Артикул", Артикул).Пустая() Тогда
СсылкаНоменклатура = Справочники.Номенклатура.НайтиПоРеквизиту("Артикул", Артикул);
Сообщить("Найдено " + Строка(НомерСтроки));
СсылкаТТКод = Справочники.Номенклатура.СоздатьЭлемент();
СсылкаТТКод.ТТКод = ТТКод;
СсылкаТТКод.Записать();
Сообщить(СсылкаНоменклатура);
Сообщить(СсылкаТТКод);
КонецЕсли;

ОбработкаПрерыванияПользователя();


КонецЦикла;

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

Ошибка следующая: Найдено 2
Перед записью в элементе справочника "Номенклатура" необходимо заполнить "базовая единица"!
Перед записью в элементе справочника "Номенклатура" необходимо заполнить "вид номенклатуры"!

Убрал в коде строку Если не Справочники.Номенклатура.НайтиПоРеквизиту("Артикул", Артикул).Пустая(), ошибка прежняя

Процедура КнопкаВыполнитьНажатие(Файл, Excel)
//Сообщить(ИмяФайла);
ExcelПриложение = Новый COMОбъект("Excel.Application");
ExcelФайл = ExcelПриложение.WorkBooks.Open(ИмяФайла);
Sheet =ExcelФайл.Sheets(1);

НомерСтроки = 1;
Пока НомерСтроки < 5340 Цикл
НомерСтроки = НомерСтроки +1;
Артикул = Sheet.Cells(НомерСтроки, 1).Value;
ТТКод = Sheet.Cells(НомерСтроки, 2).Value;

СсылкаТТКод = Справочники.Номенклатура.НайтиПоРеквизиту("Артикул",ТТКод);
СсылкаНоменклатура = Справочники.Номенклатура.НайтиПоРеквизиту("Артикул", Артикул);
Сообщить("Найдено " + Строка(НомерСтроки));
СсылкаТТКод = Справочники.Номенклатура.СоздатьЭлемент();
СсылкаТТКод.ТТКод = ТТКод;
СсылкаТТКод.Записать();
Сообщить(СсылкаНоменклатура);
Сообщить(СсылкаТТКод);

ОбработкаПрерыванияПользователя();


КонецЦикла;

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