Загрузить данные в 1С из Excel
обЭксел = СоздатьОбъект(“Excel.Application”); //создаем объект
НашФайл = обЭксел.Workbooks.Open(СокрЛП(ИмяФайла)); //Открываем файл
НашЛист = НашФайл.Sheets(1); //Устанавливаем нужный лист
Знач1 = НашЛист.Cells(1,1); // Считываем значение, здесь: из первой ячейки первой строки
// Затем Знач1 сохраняем: в константе, справочнике или документе – как требуется в конфигурации
//Если нужно считать несколько значений то организуем цикл
Для i = 1 По Знач1 Цикл
Знач = НашЛист.Cells(i,1).Value;
// Затем Знач сохраняем: в константе, справочнике или документе – как требуется в конфигурации
КонецЦикла;
ОбЭксел.WorkBooks.close();
ОбЭксел.Quit();
| 
опубликовано: 18 Май 2009, 14:17