tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板 [ツリー表示へ]   [Home]
一括表示(VB6.0)
タイトル印刷ページ数について
記事No11357
投稿日: 2008/02/08(Fri) 13:33
投稿者しゅう
現在、Accessで読み込み→VB上で編集→Excelで印刷という処理を作っています。
Excel上に吐き出した時の1ページ目に
番号・名前・住所etcの各セル毎のタイトルをセル位置指定で打ってました。
(xlSheet.Cells(X, X) = "氏名"という感じです。)
そして次の行からレコードセットの.RecordCountの数字分、実際にデータを入れてたのですが、
この方法だと2ページ目以降はデータだけでタイトルは出ません。
2ページ目以降にもタイトルを入れる方法を教えてください。

1ページあたりの行数指定は出来ないです。
文字やセルの大きさ、余白を変えれる仕様なので1ページに表示される行数が可変なので。

[ツリー表示へ]
タイトルRe: 印刷ページ数について
記事No11359
投稿日: 2008/02/08(Fri) 14:19
投稿者魔界の仮面弁士
(シートの)PageSetup プロパティに対して、PrintTitleRows を指定するか、
または LeftHeader / CenterHeader / RightHeader を割り当ててみるとか。

[ツリー表示へ]
タイトルRe^2: 印刷ページ数について
記事No11363
投稿日: 2008/02/08(Fri) 16:04
投稿者しゅう
>魔界の仮面弁士様
PageSetupプロパティのPrintTitleRowsで解決致しました。

この関数を使った場合、2行目以降のタイトルのセルの高さや、
タイトル行のセルの装飾(タイトル下は2重線にしてます)
も1ページ目の手打ちした行と変わらないんですよね?

印刷プレビューでは変わらないのが確認出来たのですが、
今、プリンターが使えない状況なので実際に印刷出来ないので。

[ツリー表示へ]