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

Вниз

Delphi & Excel   Найти похожие ветки 

 
Ann_k   (2004-05-05 16:23) [0]

D7, Excel2000

Нужно развернуть страницу Excel в альбомный вид.
Подскажите, пожалуйста, как правильно это сказать, чтобы Delphi понял?

Использую  Appl: TExcelApplication;
Сказать ему appl.activesheet.pagesetup.orientation:=xlLandscape
не получается, он говорит, что св-ва  pagesetup у activesheet не существует.


 
Palladin ©   (2004-05-05 16:33) [1]

activesheet есть IDispatch
нужно привести его к TExcelWorksheet


 
Ann_k   (2004-05-05 16:41) [2]

А можно это в виде кода написать?  

Это должно выглядеть так?
 active_sheet:=TExcelWorksheet(Appl.ActiveSheet);
 active_sheet.PageSetup.Orientation := xlLandscape;


 
Ann_k   (2004-05-05 17:19) [3]

2Palladin:
И все-таки, пожалуйста, кусок кода! Неопытная я еще в общении с Excelem через Delphi.


 
Palladin ©   (2004-05-05 17:37) [4]

(appl.activesheet as _WorkSheet).PageSetup.Orientation:=xlLandScape


 
Ann_k   (2004-05-05 17:50) [5]

2Palladin: Спасибо большое! :-)



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

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

Наверх




Память: 0.47 MB
Время: 0.05 c
3-1083237481
Felan
2004-04-29 15:18
2004.05.23
Системные переменные Interbase


9-1072307431
Кен
2003-12-25 02:10
2004.05.23
Авторы GLScene сделали первую игрушку на своём движке. Можно их


1-1084222421
Mishenka
2004-05-11 00:53
2004.05.23
Тип файла


1-1084329754
Юрец2
2004-05-12 06:42
2004.05.23
Как уменьшить шрифт


14-1083737715
Шишкин Илья
2004-05-05 10:15
2004.05.23
Проверьте работоспособность кода в Windows98