| 用紙サイズ・用紙の向き・用紙トレイ・印刷枚数・拡大縮小・他を指定する （０３６） | |
| １．用紙サイズを変更する Printer.PaperSize = vbPRPSA4 'A4サイズ Printer.PaperSize = vbPRPSB5 'B5サイズ ' ユーザー定義サイズを使用する場合 With Printer .PaperSize = vbPRPSUser 'ユーザー定義サイズ '縦寸法(必ずtwip単位で設定) (56.7*216)twip = 216mm .Height = 56.7 * 216 .Width = 56.7 * 310 '横寸法(必ずtwip単位で設定) End With '１インチあたり 1,440 twip、１センチあたり 567 twip 'その他 給紙装置等矛盾した設定になっていない事 用紙サイズの定数は PaperSize をヘルプで調べて下さい ２．用紙の向きを変更する Printer.Orientation = vbPRORLandscape '横向き Printer.Orientation = vbPRORPortrait '縦向き ３．用紙トレイを設定する Printer.PaperBin = vbPRBNAuto '現在の既定値のトレイ '用紙が 1 枚ずつ手差しで供給されるまで待機します Printer.PaperBin = VbPRBNManual 用紙トレイの定数は PaperBin をヘルプで調べて下さい ４．印刷枚数を設定する Printer.Copies = 1 '印刷枚数を指定 ５．拡大・縮小印刷する Printer.Zoom = 50 '縮小率を１００分率で指定 Printer.Zoom =150 '拡大率を１００分率で指定 ただし効果はプリンターメーカーが提供するドライバーに依存します ６．改ページ設定 Printer.NewPage |
|
| 上記設定１番〜５番は印刷処理が終了（Printer.EndDoc）するまで途中で変更できません。 |
|