Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

印刷範囲の設定・解除（PageSetup.PrintArea プロパティ）

2015/10/01

PageSetup.PrintArea プロパティ

印刷範囲を設定するには、PageSetup オブジェクト の PrintArea プロパティ に、セル範囲（ A1 形式の文字列）を指定します。設定をクリアするには、””（空文字）を指定します。PageSetup.PrintArea プロパティ は、取得および設定が可能です。

【書式】

＜取得＞
object.PageSetup.PrintArea

＜設定＞
object.PageSetup.PrintArea = string

引数・戻り値

object ・・・対象となる Worksheet オブジェクト を指定します。
string ・・・印刷範囲を A1 形式の文字列で設定します。印刷範囲をクリアする場合は、””（空文字）を指定します。

PageSetup.PrintArea プロパティ使用例

サンプルVBAソース

　
Sub Sample_PageSetupPrintArea()

    Dim w As Worksheet
    Set w = ActiveSheet
    
    With w
        
        '印刷範囲を設定
        .PageSetup.PrintArea = Range("B3").CurrentRegion.Address
        
        '印刷プレビューを表示
        .PrintPreview
    
    End With

End Sub

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ソース実行前

実行後

- ブック・シートの操作 PageSetup プロパティ, PrintArea プロパティ, VBA基本, Worksheet オブジェクト, エクセルVBA, ブック・シートの操作, 印刷

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 行列番号を含めて印刷（PageSetup.PrintHeadings プロパティ）

PageSetup.PrintHeadings プロパティ PageSetup. …

: 新しいウィンドウを開く（NewWindow メソッド）

NewWindow メソッド NewWindow メソッドで、任意のブックのコピ …

: 選択されているシートを参照する（SelectedSheets プロパティ）

SelectedSheets プロパティ選択されているすべてのシートをあらわす …

: ページ数に合わせて印刷（FitToPagesTall, FitToPagesWide）

PageSetup.FitToPagesTall プロパティ PageSetup …

: 印刷品質を設定（PageSetup.PrintQuality プロパティ）

PageSetup.PrintQuality プロパティ PageSetup.P …

: 画面の上端・左端を設定（ScrollRow プロパティ、ScrollColumn プロパティ）

画面の上端・左端を設定 ScrollRow プロパティで、指定した行を画面上端に …

: ブックのファイル形式を調べる（FileFormat プロパティ）

ブックのファイル形式を調べる（FileFormat プロパティ）指定したブック …

: 行列の見出しの表示・非表示（DisplayHeadings プロパティ）

DisplayHeadings プロパティ行と列の見出しの表示・非表示を設定お …

: 印刷時、シート内のエラーをどう扱うかを設定（PrintErrors プロパティ）

PageSetup.PrintErrors プロパティ PageSetup.Pr …

: 白黒印刷（PageSetup.BlackAndWhite プロパティ）

PageSetup.BlackAndWhite プロパティ PageSetup. …

PREV: 印刷・印刷プレビュー（PrintOut メソッド、PrintPreview メソッド）
NEXT: 白黒印刷（PageSetup.BlackAndWhite プロパティ）