Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
2911 / 13657 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【65336】印刷範囲の指定 トビイシ 10/5/12(水) 22:04 質問[未読]
【65337】Re:印刷範囲の指定 りん 10/5/12(水) 22:25 発言[未読]
【65390】Re:印刷範囲の指定 トビイシ 10/5/17(月) 20:58 お礼[未読]
【65336】印刷範囲の指定
質問  トビイシ  - 10/5/12(水) 22:04 -
引用なし
パスワード
   こんばんは

　以下のシートがあるとします。印刷範囲をA1:D3まで設定して、印刷したいですが、データの範囲が可変ですので、毎回、手動で範囲をしてから、印刷を行っています。自動化をするのにどうすればいいでしょうか？


　　 A　B　C　D　
1　　1　2　3　4
2　　2　4　6　8　
3　　3　6　
4
5
6
【65337】Re:印刷範囲の指定
発言  りん E-MAIL  - 10/5/12(水) 22:25 -
引用なし
パスワード
   トビイシ さん、こんばんわ。
>こんばんは
>
>　以下のシートがあるとします。印刷範囲をA1:D3まで設定して、印刷したいです

↓のような場合だと、CurrentRegionプロパティで取得できます。
>　　 A　B　C　D　
>1　　1　2　3　4
>2　　2　4　6　8　
>3　　3　6　
>4
>5
>6

Sub test()
　 MsgBox Range("A1").CurrentRegion.Address
End Sub
【65390】Re:印刷範囲の指定
お礼  トビイシ  - 10/5/17(月) 20:58 -
引用なし
パスワード
   りん さん

　ヒントをいただき、ありがとうございました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
2911 / 13657 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free