印刷の用紙サイズを設定(PageSetup.PaperSize プロパティ)
PageSetup.PaperSize プロパティ
PageSetup.PaperSize プロパティを使用して、印刷用紙のサイズを設定および取得することができます。XlPaperSize 列挙型の定数を使用します。
<取得>
object.PageSetup.PaperSize
<設定>
object.PageSetup.PaperSize = const
引数・戻り値
- object ・・・ 対象となる Worksheet オブジェクト を指定します。
- const ・・・ 用紙サイズを表す XlPaperSize 列挙型 の定数またはその値を指定します。
定数 値 説明 xlPaperLetter 1 レター (8-1/2 x 11 インチ) xlPaperLetterSmall 2 レター (小) (8-1/2 x 11 インチ) xlPaperTabloid 3 タブロイド (11 x 17 インチ) xlPaperLedger 4 Ledger (17 x 11 インチ) xlPaperLegal 5 リーガル (8-1/2 x 14 インチ) xlPaperStatement 6 ステートメント (5-1/2 x 8-1/2 インチ) xlPaperExecutive 7 エグゼクティブ (7-1/2 x 10-1/2 インチ) xlPaperA3 8 A3 (297 mm x 420 mm) xlPaperA4 9 A4 (210 mm x 297 mm) xlPaperA4Small 10 A4 スモール (210 mm x 297 mm) xlPaperA5 11 A5 (148 mm x 210 mm) xlPaperB4 12 B4 (250 mm x 354 mm) xlPaperB5 13 A5 (148 mm x 210 mm) xlPaperFolio 14 Folio (8-1/2 x 13 インチ) xlPaperQuarto 15 4 つ折版 (215 mm x 275 mm) xlPaper10x14 16 10 x 14 インチ xlPaper11x17 17 11 x 17 インチ xlPaperNote 18 ノート (8-1/2 x 11 インチ) xlPaperEnvelope9 19 封筒 #9 (3-7/8 x 8-7/2 インチ) xlPaperEnvelope10 20 封筒 #10 (4-1/8 x 9-1/2 インチ) xlPaperEnvelope11 21 封筒 #11 (4-1/2 x 10-3/8 インチ) xlPaperEnvelope12 22 封筒 #12 (4-1/2 x 11 インチ) xlPaperEnvelope14 23 封筒 #14 (5 x 11-1/2 インチ) xlPaperCsheet 24 C サイズ シート xlPaperDsheet 25 D サイズ シート xlPaperEsheet 26 E サイズ シート xlPaperEnvelopeDL 27 封筒 DL (110 mm x 220 mm) xlPaperEnvelopeC5 28 封筒 C5 (162 mm x 229 mm) xlPaperEnvelopeC3 29 封筒 C3 (324 mm x 458 mm) xlPaperEnvelopeC4 30 封筒 C4 (229 mm x 324 mm) xlPaperEnvelopeC6 31 封筒 C6 (114 mm x 162 mm) xlPaperEnvelopeC65 32 封筒 C65 (114 mm x 229 mm) xlPaperEnvelopeB4 33 封筒 B4 (250 mm x 353 mm) xlPaperEnvelopeB5 34 封筒 B5 (176 mm x 250 mm) xlPaperEnvelopeB6 35 封筒 B6 (176 mm x 125 mm) xlPaperEnvelopeItaly 36 封筒 (110 mm x 230 mm) xlPaperEnvelopeMonarch 37 封筒 Monarch (3-7/8 x 7-1/2 インチ) xlPaperEnvelopePersonal 38 封筒 (3-5/8 x 6-1/2 インチ) xlPaperFanfoldUS 39 米国標準複写紙 (14-7/8 x 11 インチ) xlPaperFanfoldStdGerman 40 ドイツ リーガル複写紙 (8-1/2 x 13 インチ) xlPaperFanfoldLegalGerman 41 ドイツ リーガル複写紙 (8-1/2 x 13 インチ) xlPaperUser 256 ユーザー定義
PageSetup.PaperSize プロパティ に設定した値(用紙サイズ)を、使用するプリンタがサポートしていない場合は、エラーが発生します。
PageSetup.PaperSize プロパティ 使用例
サンプルVBAソース
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
Sub Sample_PageSize() Dim w As Worksheet Set w = ActiveSheet '用紙サイズを設定 w.PageSetup.PaperSize = xlPaperA4 '印刷プレビューを表示 w.PrintPreview End Sub |
実行結果
サンプルVBAソース を実行しプレビューが表示されたところで、ページ設定を確認
関連記事
-
アクティブプリンタを変更(ActivePrinter プロパティ)
ActivePrinter プロパティ ActivePrinter プロパティを …
-
再計算(Calculation, EnableCalculation, Calculate)
ワークブックやシートの再計算 通常、Excel では、自動的に再計算が行われる設 …
-
ブック・シートの名前を取得・設定(Name プロパティ)
ワークブックの名前を取得 Name プロパティで、ワークブックの名前を取得します …
-
印刷範囲の設定・解除(PageSetup.PrintArea プロパティ)
PageSetup.PrintArea プロパティ 印刷範囲を設定するには、Pa …
-
アウトライン記号の表示・非表示(DisplayOutline プロパティ)
アウトライン記号の表示・非表示(DisplayOutline プロパティ) Di …
-
数式を表示(DisplayFormulas プロパティ)
数式を表示(DisplayFormulas プロパティ) セルに数式が入力されて …
-
イベントの発生・無効をコントロール(EnableEvents プロパティ)
EnableEvents プロパティ EnableEvents プロパティに T …
-
簡易印刷(PageSetup.Draft プロパティ)
PageSetup.Draft プロパティ PageSetup.Draft プロ …
-
ワークシートを参照する(Sheets プロパティ)
Sheets プロパティ Sheets プロパティは、Sheets コレクション …
-
印刷実行前に総ページ数を取得(ExecuteExcel4Macro メソッド)
印刷の総ページ数を取得(ExecuteExcel4Macro メソッド) Exc …