Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.01.07;
Скачать: CL | DM;

Вниз

Как программно сделать закрепленную область в Excel?   Найти похожие ветки 

 
pavel_guzhanov ©   (2005-09-27 10:52) [0]

Здравствуйте.
Для вывода данных в отчет использую Excel.
Необходимо закрепить верхнюю строку отчета, чтобы при прокрутке она оставалась на месте.
Делаю так:
var
m_XLApp, Sheet, Colum, Row, Selected:Variant;
begin
 // создаём объект Excel
 m_XLApp := CreateOleObject("Excel.Application");
 m_XLApp.Visible := true;

 m_XLApp.WorkBooks.Add(-4167);
 m_XLApp.WorkBooks[1].WorkSheets[1].Name := "Список";
 Sheet:=m_XLApp.Workbooks[1].Worksheets["Список"];
 Sheet.PageSetup.Orientation:=xlLandscape;
// строки
 Row:=m_XLApp.Workbooks[1].Worksheets["Список"].Rows;
//выделяю вторую строку
 Selected:=Row.Rows[2].Select;
// вот на этой строке получаю ошибку "Invalid variant operation"
 Selected.ActiveWindow.FreezePanes:= True;

Подскажите, как правильно использовать свойство FreezePanes?
Спасибо


 
pavel_guzhanov ©   (2005-09-27 11:48) [1]

Разобрался.
Спасибо всем, кто хотел помочь..


 
YurikGL ©   (2005-09-27 20:39) [2]


> pavel_guzhanov ©   (27.09.05 11:48) [1]

А как разобрался?


 
pavel_guzhanov ©   (2005-09-28 08:02) [3]

Sheet.Activate;
 Sheet.Range["C2:C2"].Select;
 m_XLApp.ActiveWindow.FreezePanes:= True;


Таким образом закрепил первую строку и два первых столбца



Страницы: 1 вся ветка

Текущий архив: 2007.01.07;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.039 c
15-1166522933
zdm
2006-12-19 13:08
2007.01.07
HP предлагает драйвера для Windows Vista


15-1166101735
Ученик чародея
2006-12-14 16:08
2007.01.07
Был сегодня на предзащите докторской ф-м.н.


8-1148034630
0bsid
2006-05-19 14:30
2007.01.07
Как взять кусок одного TImage и создать из него другой TImage?


2-1166356390
VadimSpb
2006-12-17 14:53
2007.01.07
Определение ID последней записи


15-1166041883
palva
2006-12-13 23:31
2007.01.07
Изменить соотношение высоты и ширины картинки при просмотре AVI