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