Имя: Пароль:
1C
 
Экспорт данных из Excel в 1С.8.0
0 Ивар
 
01.12.04
06:57
Существует задача: есть екселевский файл с таблицей, необходимо найти скрипт или обработку для экспорта данных в 1с 8.0. Помагите у меня запарка нужно в короткие сроки заполнить базу, в книге я нашел, такие скрипты есть, но он не работает видимо не хватает страници в книге.
Люди! ПОМАГИТЕ! Зарание спасибо!
1 Shaytan
 
01.12.04
09:33
Посмотри здесь, может пригодится - простейший случай, когда данные в колонке "A"
v8: Как получить значение ячейки из файла excel?
2 mindwalker
 
01.12.04
10:02
гл_appExcel = Новый COMObject("Excel.Application");
   
     exWorkBook = гл_appExcel.Workbooks.Open( ПутьКФайлуЗаявки );

   RangeAll = exWorkBook.ActiveSheet.UsedRange;

   // Получить текст ячейки ( 2, 3 ) - текстовый формат при любом типе значения ячейки
   ТекстЯчейки = RangeAll.Cells( 2, 3 ).Text;


   // перебор всех ячеек    
   ЧислоСтрок = RangeAll.Rows.Count;
   ЧислоКолонок = RangeAll.Columns.Count;    

   Для НомерСтроки = 1 По ЧислоСтрок Цикл

       Для НомерКолонки = 1 По ЧислоКолонок Цикл

           ЗначениеЯчейки = RangeAll.Cells( НомерСтроки, НомерКолонки ).Value; // значение такого же типа как и ячейка
           
           ТекстЯчейки = RangeAll.Cells( НомерСтроки, НомерКолонки ).Text;     // текстовое отображение значения ячейки

       
       КонецЦикла;

   КонецЦикла;

   exWorkBook.Close( Ложь );

   гл_appExcel.Workbooks.Close( );