印刷時の改ページ設定(Add,ResetAllPageBreaks)
改ページの追加と解除
印刷時に改ページを指定するには、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ソース
|
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 |
実行結果
関連記事
-
-
ウィンドウの位置を入れ替える(ActivatePrevious メソッド、ActivateNext メソッド)
ウィンドウの位置を入れ替える ActivatePrevious メソッド、Act …
-
-
印刷設定(ヘッダーに画像を指定)LeftHeaderPicture, CenterHeaderPicture, RightHeaderPicture
ヘッダーに画像を表示するには LeftHeaderPicture プロパティ、C …
-
-
印刷設定(ページごとに異なるヘッダー・フッターを設定)Page オブジェクト・HeaderFooter オブジェクト
Page オブジェクト ページごとに異なるヘッダーおよびフッターを設定する場合、 …
-
-
ユーザー設定のビュー(CustomViews プロパティ)
ユーザー設定のビュー CustomViews コレクションは、ユーザー設定ビュー …
-
-
シートを保護・保護したシートを解除する(Protect メソッド・Unprotect メソッド)
Protect メソッド・Unprotect メソッド Protect メソッド …
-
-
ウィンドウ枠の固定(FreezePanes プロパティ、SplitColumn プロパティ,SplitRow プロパティ)
ウィンドウ枠の固定と解除 ウィンドウ枠を固定するには FreezePanes プ …
-
-
ワークシートの追加・削除(Add メソッド・Delete メソッド)
新しいワークシートを作成 Add メソッドで、新しいワークシートを指定した場所に …
-
-
ファイル保存の既定の形式を取得・設定(DefaultSaveFormat プロパティ)
DefaultSaveFormat プロパティ DefaultSaveForma …
-
-
ワークシートの数を数える(Count プロパティ)
Count プロパティ 指定したWorksheets コレクションやSheets …
-
-
計算精度を設定する(PrecisionAsDisplayed プロパティ)
PrecisionAsDisplayed プロパティ PrecisionAsDi …
