印刷位置を中央に設定(CenterHorizontally, CenterVertically)
PageSetup.CenterHorizontally プロパティ
PageSetup.CenterHorizontally プロパティを使用して、印刷位置を水平方向の中央(余白を除く)に設定することができます。値の取得および設定が可能で、ブール型(Boolean)の値を使用します。
<取得>
object.PageSetup.CenterHorizontally
<設定>
object.PageSetup.CenterHorizontally = boolean
引数・戻り値
- object ・・・ 対象となる Worksheet オブジェクト を指定します。
- boolean ・・・ ブール型(Boolean)の値を指定します。True を指定すると、印刷位置を水平方向の中央(余白を除く)に設定します。
PageSetup.CenterVertically プロパティ
PageSetup.CenterVertically プロパティを使用して、印刷位置を垂直方向の中央(余白を除く)に設定することができます。値の取得および設定が可能で、ブール型(Boolean)の値を使用します。
<取得>
object.PageSetup.CenterVertically
<設定>
object.PageSetup.CenterVertically = boolean
引数・戻り値
- object ・・・ 対象となる Worksheet オブジェクト を指定します。
- boolean ・・・ ブール型(Boolean)の値を指定します。True を指定すると、印刷位置を垂直方向の中央(余白を除く)に設定します。
CenterHorizontally プロパティ・CenterVertically プロパティ 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 |
Sub Sample_Center() Dim w As Worksheet Set w = ActiveSheet '用紙の中央(余白除く)に印刷するように設定 w.PageSetup.CenterHorizontally = True w.PageSetup.CenterVertically = True '印刷プレビューを表示 w.PrintPreview End Sub |
実行結果
関連記事
-
-
ワークシートのコピー・移動(Copy メソッド Move メソッド)
Copy メソッド Copy メソッドで、指定した位置にワークシートの複製を作成 …
-
-
選択されているシートを参照する(SelectedSheets プロパティ)
SelectedSheets プロパティ 選択されているすべてのシートをあらわす …
-
-
印刷設定を高速化(PrintCommunication プロパティ)
PrintCommunication プロパティ PrintCommunicat …
-
-
アクティブプリンタを変更(ActivePrinter プロパティ)
ActivePrinter プロパティ ActivePrinter プロパティを …
-
-
シート見出しの色を設定(Tab プロパティ)
シート見出しの色を設定 Tab オブジェクトの Color プロパティ、Colo …
-
-
印刷のページ区切り(DisplayPageBreaks プロパティ)
DisplayPageBreaks プロパティ 印刷したあとや印刷プレビューを表 …
-
-
ブックの変更が保存されているかを確認する(Saved プロパティ)
ブックの変更が保存されているかを確認する(Saved プロパティ) Saved …
-
-
ブックのプロパティ(BuiltinDocumentProperties プロパティ)
BuiltinDocumentProperties プロパティ ブックのプロパテ …
-
-
ウィンドウを整列(Windows.Arrange メソッド)
ウィンドウを整列(Windows.Arrange メソッド) Windows コ …
-
-
ブックを別名で保存(SaveAs メソッド)
ブックを別名で保存(SaveAs メソッド) ブックの変更を保存したり、新規ブッ …
