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

印刷時の改ページ設定（Add,ResetAllPageBreaks）

2015/10/21

改ページの追加と解除

印刷時に改ページを指定するには、HPageBreaks コレクション（ワークシート内のすべての水平方向の改ページ）または、VPageBreaks コレクション（ワークシート内のすべての垂直方向の改ページ）の Add メソッド を使用します。
追加したすべての改ページを解除するには、Worksheet オブジェクト の ResetAllPageBreaks メソッド を使用します。

水平方向の改ページを追加する（HPageBreaks.Add メソッド）

【書式】

object.HPageBreaks.Add ( before )

引数・戻り値

object ・・・対象となる Worksheet オブジェクト を指定します。
before ・・・基準となるセル（Range オブジェクト）を指定します。ここで指定した範囲の上側に、新しい改ページが追加されます。

垂直方法の改ページを追加する（VPageBreaks.Add メソッド）

【書式】

object.VPageBreaks.Add ( before )

引数・戻り値

object ・・・対象となる Worksheet オブジェクト を指定します。
before ・・・基準となるセル（Range オブジェクト）を指定します。ここで指定した範囲の左側に、新しい改ページが追加されます。

すべての改ページを解除する（ResetAllPageBreaks メソッド）

【書式】

object.ResetAllPageBreaks

引数・戻り値

object ・・・対象となる Worksheet オブジェクト を指定します。

改ページ設定の使用例

サンプルVBAソース

　
Sub Sample_PageBreaks()

    Dim w As Worksheet
    Set w = ActiveSheet

    '印刷範囲を設定
    w.PageSetup.PrintArea = "A1:J24"

    'すべての改ページを解除
    w.ResetAllPageBreaks
    
    '改ページを追加（水平方向）
    w.HPageBreaks.Add Range("A13")
    
    '改ページを追加（垂直方向）
    w.VPageBreaks.Add Range("F:F")

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

　

Sub Sample_PageBreaks()

Dim w As Worksheet

Set w = ActiveSheet

'印刷範囲を設定

w.PageSetup.PrintArea = "A1:J24"

'すべての改ページを解除

w.ResetAllPageBreaks

'改ページを追加（水平方向）

w.HPageBreaks.Add Range("A13")

'改ページを追加（垂直方向）

w.VPageBreaks.Add Range("F:F")

End Sub

　

実行結果

- ブック・シートの操作 HPageBreaks.Add メソッド, ResetAllPageBreaks メソッド, VBA基本, VPageBreaks.Add メソッド, Worksheet オブジェクト, エクセルVBA, ブック・シートの操作, 印刷

Tweet

Message コメントをキャンセル

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

関連記事

: 印刷実行前に総ページ数を取得（ExecuteExcel4Macro メソッド）

印刷の総ページ数を取得（ExecuteExcel4Macro メソッド） Exc …

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

PageSetup.FitToPagesTall プロパティ PageSetup …

: ブックが共有モードか確認する（MultiUserEditing プロパティ）

ブックが共有モードか確認する（MultiUserEditing プロパティ）共 …

: 印刷の倍率（拡大／縮小）（PageSetup.Zoom プロパティ）

PageSetup.Zoom プロパティ PageSetup.Zoom プロパテ …

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

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

: ブックの表示・非表示（Visible プロパティ）

ブック表示・非表示（Visible プロパティ）ブック（ウィンドウ）が表示され …

: 数式を表示（DisplayFormulas プロパティ）

数式を表示（DisplayFormulas プロパティ）セルに数式が入力されて …

: シートを保護・保護したシートを解除する（Protect メソッド・Unprotect メソッド）

Protect メソッド・Unprotect メソッド Protect メソッド …

: 印刷のタイトル行、タイトル列を設定（PrintTitleRows,PrintTitleColumns）

PageSetup.PrintTitleRows プロパティ PageSetup …

: ワークシートにクリップボードの内容を貼り付ける（Paste メソッド）

Paste メソッド指定したワークシート上にクリップボードのデータを貼り付けま …

PREV: 印刷設定を高速化（PrintCommunication プロパティ）
NEXT: 印刷のページ区切り（DisplayPageBreaks プロパティ）