Excel操作でシートのページ設定をしています。
PageSetup.PaperSize := xlPaperA4;
PageSetup.Orientation := xlPortrait;
PageSetup.Zoom := 60;
PageSetup.PrintTitleRows := '$1:$10';
PageSetup.PrintTitleColumns := '$B:$E';
このうちページサイズ指定と用紙の方向が設定されません。
ズームやタイトル行は設定されます。
こちらの環境(Delphi2009、Excel2000)で試したところ
PaperSizeは xlPaperA4、
Orientationは xlPortrait、xlLandscape いずれも
正しく設定されました。
ちなみに試したのは、PaperSize、Orientationのみで、
Zoom、PrintTitleRows、PrintTitleColumns は、指定していません。
igyさん情報ありがとうございました。
質問時の情報が不足していました。
環境はDelphi2005,Delphi2007 Excel2002です。
コンパイル時 未定義の識別子:xlPaperA4となります。
外国のFAQをみて
const
xlPortrait = 1;
xlLandscape = 2;
xlPaperA4 = 9;
と書いたら無事コンパイルできました。
ツイート | ![]() |