Имя: Пароль:
1C
 
Копирование книг Excele в одну общую книгу по листам
0 Uchenica74
 
08.08.14
13:51
Добрый день! Сохраняю Табличные документы в разные книги Excele  (ТабДокОсновной.Записать(ИмяФ, ТипФайлаТабличногоДокумента.XLS)), затем их копирую в одну общую книгу (каждую книгу по листам). Подскажите пожалуйста есть ли какое то свойство у листа Excele, которое бы позволило бы сохранить пропорции копируемой книги?

Для каждого ПутьКЭксель Из МассивПутей Цикл
    ДокЭксель.WorkBooks.Open(ПутьКЭксель);
    ТекущийЛист = ДокЭксель.ActiveWorkbook.Sheets(1);
    НачО = ТекущийЛист.Cells(1,1);
    КонО = ТекущийЛист.Cells(100,100);
    
        ДокЭксель.ActiveWorkbook.Sheets(1).Range(НачО ,КонО).Select();
    ДокЭксель.Selection.Copy();
    Лист = ОбщаяКнига.WorkSheets.add();
    Лист.name = Индекс;
    Лист.paste();
    Лист.ДокЭксель.ActiveWorkbook.close();
    Индекс = Индекс + 1;
КонецЦикла;