印刷範囲の設定・解除(PageSetup.PrintArea プロパティ)
PageSetup.PrintArea プロパティ
印刷範囲を設定するには、PageSetup オブジェクト の PrintArea プロパティ に、セル範囲( A1 形式の文字列)を指定します。設定をクリアするには、””(空文字)を指定します。PageSetup.PrintArea プロパティ は、取得および設定が可能です。
<取得>
object.PageSetup.PrintArea
<設定>
object.PageSetup.PrintArea = string
引数・戻り値
- object ・・・ 対象となる Worksheet オブジェクト を指定します。
- string ・・・ 印刷範囲を A1 形式の文字列で設定します。印刷範囲をクリアする場合は、””(空文字)を指定します。
PageSetup.PrintArea プロパティ 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
Sub Sample_PageSetupPrintArea() Dim w As Worksheet Set w = ActiveSheet With w '印刷範囲を設定 .PageSetup.PrintArea = Range("B3").CurrentRegion.Address '印刷プレビューを表示 .PrintPreview End With End Sub |
実行結果
サンプルVBAソース 実行前
実行後
関連記事
-
-
印刷設定を高速化(PrintCommunication プロパティ)
PrintCommunication プロパティ PrintCommunicat …
-
-
印刷設定(先頭ページのヘッダー・フッターを設定)DifferentFirstPageHeaderFooter, FirstPage
先頭ページに別のヘッダーおよびフッターを設定 先頭ページのヘッダーおよびフッター …
-
-
印刷設定(ヘッダー/フッター)書式コード・VBAコード
印刷設定(ヘッダー/フッター)書式コード・VBAコード ヘッダーおよびフッター( …
-
-
ワークシートの数を数える(Count プロパティ)
Count プロパティ 指定したWorksheets コレクションやSheets …
-
-
印刷時のページの番号付けの方向を設定(PageSetup.Order プロパティ)
PageSetup.Order プロパティ PageSetup.Order プロ …
-
-
アウトライン記号の表示・非表示(DisplayOutline プロパティ)
アウトライン記号の表示・非表示(DisplayOutline プロパティ) Di …
-
-
印刷のページ区切り(DisplayPageBreaks プロパティ)
DisplayPageBreaks プロパティ 印刷したあとや印刷プレビューを表 …
-
-
ワークシートにクリップボードの内容を貼り付ける(Paste メソッド)
Paste メソッド 指定したワークシート上にクリップボードのデータを貼り付けま …
-
-
ワークシートをアクティブにする・選択する(Activate, Select)
Activate メソッド・Select メソッド Activate メソッドは …
-
-
新しいウィンドウを開く(NewWindow メソッド)
NewWindow メソッド NewWindow メソッドで、任意のブックのコピ …

