Универнсальный выбор колонок из Excel
Здравствуйте. Подскажите пожалуйста как в 1с управление торговлей 11 при загрузке файла из Экселя выбирать номер нужной колонки?
Код:
В этом коде у меня выбор колонок сделан под определённый документ. А хотелось бы сделать универсальный.
Код:
ДанныеПоискаИзExcel.Очистить();
Попытка
Эксель = Новый COMОбъект("Excel.Application");
Исключение
Сообщить(ОписаниеОшибки() + " Программа Exсel не установлена на данном компьютере!");
Возврат;
КонецПопытки;
Книга = Эксель.WorkBooks.Open(ПутьКФайлу);
Лист = Книга.WorkSheets(1);
ТекСтрока = 8;
ФайлСтрок = Лист.Cells(1,1).SpecialCells(11).Row;
ФайлКолонок = Лист.Cells(1,1).SpecialCells(11).Column;
Пока Лист.Cells(ТекСтрока,1).Text<>"" Цикл
НоваяСтрока = Лист.Cells(ТекСтрока,1).Text;
НоваяСтрока = ДанныеПоискаИзExcel.Добавить();
НоваяСтрока.Артикул = Лист.Cells(ТекСтрока,3).Text;
НоваяСтрока.Производитель = Лист.Cells(ТекСтрока,1).Text;
НоваяСтрока.СсылкаНаКартинку = Лист.Cells(ТекСтрока,4).Text;
НоваяСтрока.ОписаниеТовара = Лист.Cells(ТекСтрока,5).Text;
ТекСтрока = ТекСтрока + 1;
КонецЦикла;
Книга.Close(False);
Эксель.Quit();
ПоказатьВ этом коде у меня выбор колонок сделан под определённый документ. А хотелось бы сделать универсальный.
Найденные решения
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот