Форум: "Основная";
Текущий архив: 2008.08.31;
Скачать: [xml.tar.bz2];
Вниз
Копирование данных между листами Excel Найти похожие ветки
← →
BoxTer (2007-12-10 11:49) [0]Доброе время суток!
Кто-нить знает как скопировать диапазон ячеек с одного листа Excel на другой. Лучше даже с форматированием (ширина колонок, их размеры и значения ячеек)
Вот код:
var ExcelApp,Workbook: Variant;
Begin
ExcelApp := CreateOleObject("Excel.Application");
Workbook := ExcelApp.WorkBooks.Add("c:\file.xls");
...
затем я создаю новый(2,3,...,n) листExcelApp.Workbooks[1].WorkSheets.Add();
и с предыдущего нужно скопировать шапку таблицы. Вариант:DestRange := ExcelApp.WorkBooks[1].WorkSheets[k].Range["A1", "L12"];
ExcelApp.WorkBooks[1].WorkSheets[k-1].Range["A1", "L12"].Copy(DestRange);
не работает :(
Спасибо!
← →
BoxTer (2007-12-11 06:46) [1]Разобрался, если кому интересно, то код:
DestRange := ExcelApp.WorkBooks[1].WorkSheets[k].Range["A1", "L12"];
ExcelApp.WorkBooks[1].WorkSheets[1].Range["A1", "L12"].Copy(DestRange);
работат... т.е. нада копировать с исходной страницы, а не с предыдущей...
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2008.08.31;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.005 c
