Excelで印刷範囲の自動変更

質問

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

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

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

回答No.1

merlionXX · ベストアンサー

VBAでなら可能です。

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

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

お礼

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

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

勉強します（＾＾）

回答No.5

Wendy02

こんにちは。

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

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

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

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

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

回答No.4

imogasi

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

お礼

ありました！

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

回答No.3

noname#112806

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

回答No.2

merlionXX

No1です。

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

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

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