HelpF.pro

Загрузка из Excel в Дерево значений

Код 1C v 8.х
 Попытка
Екс= Новый  COMОбъект("Excel.Application") ;
НашФайл = Екс.Workbooks.Open(пвФайл); //Открываем файл
ДеревоЛистов.Строки.Очистить();
тУроветь=ДеревоЛистов.Строки.Добавить();
тУроветь[0]=Файл.Имя;
Для к=1 по НашФайл.Sheets.Count() цикл
	тУр=ДеревоЛистов.Строки[0].Строки.Добавить();
	тУр[0]=НашФайл.Sheets.Item(к).Name();
	тУр[1]=НашФайл.Sheets.Item(к);
	тУр[3]=НашФайл.Sheets.Item(к).UsedRange.Columns.Count();   //Количество колонок
	тУр[2]=НашФайл.Sheets.Item(к).UsedRange.Rows.Count();      //Количество строк
КонецЦикла;
Исключение
	Предупреждение("Неудалось создание СОМ объекта!");
	Возврат;
КонецПопытки   

Опубликовано на сайте: https://HelpF.pro
Прямая ссылка: https://HelpF.pro/faq8/view/334.html