Excelで2行100列の表を少ない紙で印刷する方法

解決済

質問者：syatu
質問日時：2002/11/20 15:36
回答数：5件

例えば2行で100列あるような表は印刷すると何枚にもなってしまい、
用紙の無駄ですよね？
しかも、行は2行しかないのでその下の余白がもったいないです。

ページレイアウトの設定で一枚の紙に複数ページ印刷するという方法が
ありますが、それ以外に何か良い方法がありましたら
教えていただきたいのですが、よろしくお願いいたします。

通報する

この質問への回答は締め切られました。

質問の本文を隠す

回答 (5件)

No.5ベストアンサー

回答者： ka3
回答日時：2002/11/20 19:17

　下の行のセルに、参照式「＝参照先セル」を入れると云う手法

では如何でしょうか？

- 0
- 件

通報する

この回答へのお礼

ご回答ありがとうございます。
いい方法だと思いました。
素人の私にも理解できます。

この方法だと自分でもアレンジが出来ますので試してみたいと思います！！

通報する

お礼日時：2002/11/21 09:18

No.4

回答者： imogasi
回答日時：2002/11/20 17:48

下記のようなのは役立ちませんでしょうか。

（１）Sheet1の第１行にデータがあるとして、それをSheet2のA1から右列に複写する。（元データは加工しない。）
（２）3列で折り返す配置に、関数式を用いて、もって行く。簡単にするため、例として３にしました。
（３）すなわち、A２セルに関数式
=INDEX($A$1:$S$1,1,3*(ROW(A2)-1)+COLUMN(A2))を入れる。
・実際のケースでは$S$1は１００列目のセルを絶対番地で指定すること。
・「3*」の３は、何列で折り返すかの列数で置き換えること。
（４）そして、A2の式をC2まで複写する。
・実際のケースでは折り返す列数まで複写する。
（５）その後A2:C2を、第１行の総データ数／３行＋１まで複写する。
（６）次にその数行下（見だし行など入れるため）に、sheet1の第２行を複写し、同じような理屈で演算式を組みたてる。
（７）項目見出し等が必要な場合は、項目見出しも折りたためるが、
複雑になって現実的でないかも知れない。
Sheet1の第２行目を折り畳むには、Sheet2の第８行にコピーするとして
第９行から折り畳みを始めるとなるのでA9セルに
=INDEX($A$8:$S$8,1,3*(ROW(A9)-8)+COLUMN(A9))と入れることになる。

- 0
- 件

通報する

この回答へのお礼

ご回答ありがとうございます。
こちらも試してみましたが、セルが統合されてしまうようなのですが、
私のやり方がまずいんですかね？

しかし、皆さん色んな関数をご存知ですね。

通報する

お礼日時：2002/11/21 09:16

No.3

回答者： misatoanna
回答日時：2002/11/20 17:18

関数を使って全データを１ページ目に表示し、１ページ目だけを印刷されたら

いかがでしょうか。（姑息ですか？）
ただし、全セルが同じ幅だとした場合ですが‥‥。

A1 から CV2 までデータが入っているとします。
[ツール]-[オプション] で "改ページ" を表示すると、１ページ内に印刷される
セルの数がわかります。（列Ｈまででしたら８つですね）
また仮に、８列が１ページ内に印刷されるとして、残りのデータを５：６行目、
９：１０行目、‥‥ と４行ごと(間の空白行２行)に表示するとします。

セル A5 に =OFFSET($A$1,0,(INT((ROW()-5)/4)+1)*8+(COLUMN())-1)
セル A6 に =OFFSET($A$2,0,(INT((ROW()-5)/4)+1)*8+(COLUMN())-1)
と入力し、B5:H6 までコピーします。
次に、A5:H8 を選択し、下方にズ～ッとドラッグコピーします。

※数式内の ROW()-5)/4)+1)*8 の各数字の意味は想像できると思います。
　ちなみに１ページに９列入って、３行ごと(間の空白行１行)の場合は、
　ROW()-4)/3)+1)*9 になります。