Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

21463 / 76732

←次へ　｜　前へ→


	【60666】印刷範囲の制御

yoshihama/k - 09/3/7(土) 7:21 -


	引用なし

	パスワード

おはようございます！！

　マクロでExcelファイル印刷範囲を制御するため、どのように対処すれば、
よいでしょうか？また、合計欄を設けたいのですが、
自動計算可能になるのでしょうか？
ご伝授ください。
Sub Macro1()
　　ActiveSheet.PageSetup.PrintArea = "$A$1"
　　Range("A1:E16").Select　----＞範囲可変ですので、対処方法は分からない。
　　　　　　　　　　　　　　　　　範囲の下限範囲はＡ列の空欄です。
　　ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub
　　　A　　B　　C　　D　　 E
1　　　あ　　　　　　　　　 1　
2　　　い　　　　　　　　　 1
・
・
16　　た　　　　　　　　　 1
17　　　　　　　　　　合計　16　 ------>印刷を実行すると、指定されて
　　　　　　　　　　　　　　　　　　　　いる範囲と自動設けている
　　　　　　　　　　　　　　　　　　　　「合計・・・」を印刷されるよ
　　　　　　　　　　　　　　　　　　　　うにするにはどうすればいいで
　　　　　　　　　　　　　　　　　　　　しょうか？

0 hits

▼

【60666】印刷範囲の制御 yoshihama/k 09/3/7(土) 7:21

≪