Excelで印刷範囲の自動変更

エクセルで、文字を入力すると、その列までが
自動で印刷範囲の設定になります。

これはどのような設定になっているのでしょうか？

人の作ったシートで、自分でもやってみたいのですが、その方がもういないので・・・。

No.1 ベストアンサー 回答者： merlionXX 回答日時： 2005/09/07 10:12

VBAでなら可能です。

１．設定したいシートのタブを右クリック
２．「コードの表示」を選択
３．VisualBasicEditorが立ち上がるので、右の白い部分に以下をコピペします。

Private Sub Worksheet_Change(ByVal Target As Range)
rng = UsedRange.Address
PageSetup.PrintArea = rng
End Sub

この回答へのお礼

ありがとうございます！！

VBAは本当にすごいですね・。

勉強します（＾＾）

お礼日時：2005/09/07 11:17

No.5 回答者： Wendy02 回答日時： 2005/09/07 11:06

こんにちは。

#4さんに内容的にかぶってしまいますが、（すみません）

＞エクセルで、文字を入力すると、その列までが
＞自動で印刷範囲の設定になります。

それは、本当に列までなのですか？
つまり、あまり、そういう設定はしません。

#4 さんがご指摘どおり、見ていただいたほうが早いですね。プロテクトが入っていれば別ですが、たぶん、自社内でしたら、見れないようなことはないと思います。

言葉を言い換えると、Excelの印刷設定には、印刷範囲を指定しないと自動的に、ワークシートの使用範囲まで、印刷するようになっています。もしも、そのコードが見れないようでしたら、そのデータのレイアウトとそのアクション（動作）をおっしゃらないと、ちょっとコードまでは手が出せませんね。

No.4 回答者： imogasi 回答日時： 2005/09/07 10:38

（１）＞文字を入力すると、その列までが

普通エクセルはデータを入れた列＋アルファまで印刷しますが、それとどう違うのでしょうか。
（２）より右列に、「文字を入力すると」、縮小などがおこるようですか
（３）＞文字を入力すると、その列までが
の「文字」は特別な文字ですか、通常のデータのことですか
（４）マクロ（エクセルＶＢＡ）が入っていますか。
ツールーマクロ－ＶｉｓｕａｌＢａｓｉｃＥｄｉｔｏｒをクリックして
左側のフレームにエクスプローラー風の、ＶＢＡＰroject(
ブック名）が見えるでしょうが、その下のシート名や標準モジュールの箇所（行）をダブルクリックして、何かプログラムらしいものが現れますか。
＋はクリックして、展開してーにした上で、上記を確認のこと。
多分マクロの設定があるのではないかな。

この回答へのお礼

ありました！

マクロが設定されていました。。。

お礼日時：2005/09/07 11:19

No.3 回答者： noname#112806 回答日時： 2005/09/07 10:18

【ファイル】→【ページ設定】→【ページ】タブの拡大縮小印刷で、次のページ数にあわせて印刷を設定していれば、設定したページ数に印刷されるようデータの入力範囲を自動で縮小して印刷範囲にします。

No.2 回答者： merlionXX 回答日時： 2005/09/07 10:15

No1です。

手順の４を書き漏れてました。

１．設定したいシートのタブを右クリック
２．「コードの表示」を選択
３．VisualBasicEditorが立ち上がるので、右の白い部分に以下をコピペします。
４．Altキー＋F11キーでシートに戻ります。

これでご要望どおりになると思います。