[リストへもどる]
一括表示

投稿時間:2003/04/03(Thu) 00:59
投稿者名:ロー
Eメール:
URL :
タイトル:
Excelで2ページ以降の項目名印刷
はじめまして。
VBからエクセルで表の印刷を行う処理をしています。
表の一列目に項目名を出力しているのですが、2ページ目以降の一列目にも項目名
を出力したいと思います。
出力件数が不特定なことや、利用者の余白調整の関係で任意での改ページ指定が出来ません。
行数に関係なく、改ページされた最初の一列目に項目名を出力するにはどうすれば良いのでしょうか?
アドバイス宜しくおねがいします。

投稿時間:2003/04/03(Thu) 08:51
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re: Excelで2ページ以降の項目名印刷
ワード検索 で検索して見て下さい。
No.3213 にあります。

投稿時間:2003/04/03(Thu) 23:26
投稿者名:ロー
Eメール:
URL :
タイトル:
Re: 試してみたのですが...
> ワード検索 で検索して見て下さい。
> No.3213 にあります。

返信ありがとうございます。過去ログ拝見致しました。
下記の通り指定して実行したのですが、印刷プレビューにおいて変化が見られませんでした。
私の説明不足だと思いますが、表タイトル名は既に次頁以降も表示されております。
表内で例えば、
----------------------------------
!   日 付  !  曜日  !   etc..  !
----------------------------------
! 03/04/03 !  木   !           !
----------------------------------
!
----------------------------------
とあった場合、先頭の日付、曜日と言った項目を次頁以降も出力したい訳です。
宜しくお願い致します。

Dim ex As Object ' Excel.Application
Dim wb As Object ' Excel.Workbook
Dim ws As Object ' Excel.Worksheet

Set ex = CreateObject("Excel.Application")
Set wb = ex.Workbooks.Add
Set ws = wb.Worksheets.Add

With ws.PageSetup
    .PrintTitleRows = "A1:H1"
    .PrintTitleColumns = ""
End With

投稿時間:2003/04/04(Fri) 00:32
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re^2: 試してみたのですが...
やりたい事をマクロに取って見てください