1С:Предприятие 1C - [38] :: Программы :: Компьютерный форум Ru.Board

Sergey1667
Я тут немножко поиграл с Ексель через Оле... Вот что у меня вышло:
Исходный файл екселя:

Код:

150    Вася    1990
123    Петя    2006
5    Катя    2003

Три столбца с определенными переменными.
Обработка:

Код:

Процедура Сформировать()

Эксел = СоздатьОбъект("Excel.Application"); //создаем объект
Файл = Эксел.Workbooks.Open(СокрЛП("C:\1C_BASE\Test\OLE\test.xls")); //Открываем файл
Лист = Файл.Sheets(1); //Устанавливаем нужный лист
ВводДок = СоздатьОбъект("Документ.Документ");
Для К = 1 По Эксел.Cells(1,1).SpecialCells(11).Row Цикл
ВводДок.Новый();
     ВводДок.Пробег = Лист.Cells(К,1).Value;
     ВводДок.Водитель = Лист.Cells(К,2).Value;
     ВводДок.Год = Лист.Cells(К,3).Value;
     ВводДок.Записать();
КонецЦикла;
Эксел.WorkBooks.close();
Эксел.Quit();
КонецПроцедуры

У меня получилось без особых проблем записывать новый документ по строкам. По желанию можно наворотить проверку на совпадение наименований относительно кода- получаешь код из экселя и через метод НайтиПоКоду в справочнике сравниваешь оба наименования. Проведение тоже не должно взывать особых проблем, просто перед записью вызови метод Провести. А куда и как проводить это нужно написать в самом модуле документа. Думаю тут ничего сложного нет, но мне было интересно

Модерирует : gyra, Maz
Widok (17-09-2008 12:59): лимит страниц. продолжаем здесь	Версия для печати • Подписаться • Добавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104