1С прочитать Excel файл в таблицу значений без установленного Excel

Готовые тексты модулей и решений
Ответить
Аватара пользователя
admin
Администратор
Сообщения: 78
Зарегистрирован: 06 июл 2017 09:26

1С прочитать Excel файл в таблицу значений без установленного Excel

Сообщение admin » 28 фев 2020 03:12

Код: Выделить всё

	ТД=Новый ТабличныйДокумент;
	ТД.Прочитать(ИмяФайла,СпособЧтенияЗначенийТабличногоДокумента.Текст);
	ОбластьЯчеек = ТД.Область(1, 1, ТД.ВысотаТаблицы, ТД.ШиринаТаблицы);
	ИсточникДанных = Новый ОписаниеИсточникаДанных(ОбластьЯчеек);
	ПостроительОтчета = Новый ПостроительОтчета; 
	ПостроительОтчета.ИсточникДанных = ИсточникДанных;
	ПостроительОтчета.Выполнить();
	ТабЗначений = ПостроительОтчета.Результат.Выгрузить();

Ответить

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и 8 гостей