大きな列のデータを折り返して用紙一杯に印刷するには？

図書の管理をするのにＥｘｃｅｌ２００２を使い、Ａ列に図書の番号データーを６０００行程度並べました。それを印刷することになったのですが、そのままですと用紙の端だけに印刷されたものが、何十枚と出てきます。そのデータを１００行づつぐらいに折り返して用紙一杯にに無駄なく印刷するにはどうしたらよいのでしょうか？教えてください。

No.1 回答者： nagiha 回答日時： 2003/09/07 21:18

レイアウトで余白を最大限に減らし行数・文字数を最大にすればいいだけです。

あと、プリンターにふちなし印刷機能があればそれを使えばもっと多くなるかも・・・

No.2 ベストアンサー 回答者： imogasi 回答日時： 2003/09/07 22:01

（１）Ａ列だけにデータがあるとして、

Ｂ１に=OFFSET($A$1,(COLUMN()-1)*100+ROW()-1,0)
といれます。
それでＢ１の式をＢ１００まで複写してください。
その後Ｂ１：Ｂ１００を範囲指定し、Ｂ１００で＋ハンドルを出し、右へ引っ張ってください。１枚に印刷出来る範囲の列で。そこで印刷します。その後、これを何度か繰り返してください。
その際はCOLUMN()-1)*100+ROW()-1のあとに＋１０００
とか加えて、前回の終わりの次ぎがＢ１に来るようにしてください。Ｂ１:○１００は先に式・データを抹消するのが判りやすいでしょう。
（２）私ならＶＢＡをお勧めします。お望みなら拙いものですが載せます。

この回答へのお礼

返事が遅れてすみません。
早速に二人の方にご解答ありがとうございました。
初めての投稿でまだまだ少々戸惑っていました。
早速試してみたいと思います。
今後ともよろしくお願いいたします。

お礼日時：2003/09/08 21:19

No.3 回答者： nagiha 回答日時： 2003/09/08 00:33

Ｎｏ１です。

このような方法でしたら1枚で収められると思います。（相当文字が小さくなり見えなくなると思いますが・・・）
ファイル＞ページ設定を選択しページにある拡大縮小印刷のところにある次のページ数にあわせて印刷の横と縦が1になっていると思いますが、これを消し数値を入れすにＯＫを押せばすべて１枚におさまります。

この回答へのお礼

返事が遅れてすみません。
早速にご解答ありがとうございました。
初めての投稿でまだまだ少々戸惑っていました。
早速試してみたいと思います。
今後ともよろしくお願いいたします。

お礼日時：2003/09/08 21:17