Excel и 1С:Торговля и склад 7.7. Автоматизация... Как?

[ViRtU.oZ.one]

Проблема: Имеется 1С:Бухгалтерия v7.7, конфигурация "Торговля и склад". К нам приходит товар с накладными(немаленькими) в формате .xls, нужно автоматизировать процесс перегонки накладной из .xls в приходный ордер 1С... Как это сделать, есть ли готовые модули?
С уважением.

[Sla]

По моему в 1С есть модуль ввод остатков. Там из екселя можно было их затянуть (в 7.5 предприятие такое было)
что-то типа
СоздатьОбъект("Excel.Sheet")
Ну а спецы по 1С скажут точнее

[Harry]

Синтаксис создания Excel-объекта выглядит как
Ехсеl = СоздатьОбъект("Excel.Application");
Более подробно можно посмотреть в файле справке (лежит в библиотеке сайта). Глава 40 "Связь с внешними приложениями посредством механизмов DDE и OLE Automation". Среди прочего там есть интересный пример, как передавать данные из 1С в Excel.

[ViRtU.oZ.one]

Harry: Есть ли стандартные средства перегонки данных(списка позиций с ценами) из Excel - документа в приходный ордер... Если нет, то как реализовать... Этот вопрос интересен  :new_twist:...

[Kivals]

ViRtU.oZ.one
Стандартных нет, т.к. нет стандарта, как идентифицировать позицию (Код, полный код, наименование, внутренний атрибут, ...)
ну а коротко это выглядит так:

Код:

	Excel=CreateObject("Excel.Application"); // Создаем эксель
	Try	WB=Excel.Workbooks.Open(Файл); // Попытка открыть файл
	Except Message("Ошибка открытия файла", "!"); Return; EndTry;
	WS=WB.Sheets(Страница); // Выбираем нужную страницу

	ТЗ=СоздатьОбъект("ТаблицаЗначений"); // создадим таблицу, которую заполним
	ТЗ.НоваяКолонка("Название","Строка");
	ТЗ.НоваяКолонка("Цена","Число");
	
	КолНазвание=1; // В экселе
	КолЦена=2;
	НачСтр=3; // Пропустим заголовок из 2-х строк
	
	Для И1=НачСтр По КвоСтр Цикл
		ТЗ.НоваяСтрока();
		ТЗ.Название=WS.Cells(И1,КолНазвание).Value;
		ТЗ.Цена=WS.Cells(И1,КолЦена).Value;
	КонецЦикла;

[ViRtU.oZ.one]

Kivals: Спасибо , значит легких путей нет - будем разбираться ...
Если есть что-то еще по сабжу, буду рад инфе .

[Kivals]

ViRtU.oZ.one
А больше тут ничего 1С не касается
Workbooks.Open, Sheets, Cells, Value - это уже объекты, коллекции, методы и свойства VBA for Excel и справку по ним надо искать в самом экселе

[Kivals]

Вот еще подсказка (тоже по Экселю, но думаю поможет):
есть в VBA константа xlCellTypeLastCell=11
Используется для определения последней заполненной ячейки на странице.
Т.е. максимальной ячейки (строки) до которой нужно просматривать.
На самом деле - возвращаемое значение отнюдь не последняя ячейка, но вот после нее данных точно нет.
используется так:

Код:

КвоСтр=WS.UsedRange.SpecialCells(xlCellTypeLastCell).Row;

[viki]

мне надо обработку написать так чтобы она выгружалась в формате excel,кто-нибудь писал уже такое? как сделать?

[Sla]

viki, ты топик прочитал(а)?
https://forum.shelek.ru/index.php/topic,4632.msg85488.html#msg85488
т.е. ответ #4 здесь