Document.PrintOut メソッド (Visio)
アクティブな図面の内容を印刷します。また各種の印刷オプションを提供します。
構文
式。PrintOut (PrintRange、 FromPage、 ToPage、 ScaleCurrentViewToPaper、 PrinterName、 PrintToFile、 OutputFileName、 Copys、 Collate、 ColorAsBlack)
式Document オブジェクトを表す変数。
パラメーター
| 名前 | 必須 / オプション | データ型 | 説明 |
|---|---|---|---|
| PrintRange | 必須 | VisPrintOutRange | 印刷する図面ページの範囲です。 指定可能な値については「備考」を参照してください。 |
| FromPage | 省略可能 | Long | PrintRange が visPrintFromTo の場合、範囲内にある最初のページが印刷されます。 既定値は 1 で、図面の最初のページです。 |
| ToPage | 省略可能 | Long | PrintRange が visPrintFromTo の場合、範囲内にある最期のページが印刷されます。 既定値は -1 で、図面の最後のページです。 |
| ScaleCurrentViewToPaper | 省略可能 | Boolean | PrintRange が visPrintCurrentView の場合、現在の既定の用紙サイズに合わせてプログラム ウィンドウに収まる図面の部分を拡大縮小するには True 。 必要 な数のプリンター ページに印刷する場合は False。 既定値は False です。 |
| PrinterName | 省略可能 | String | 使用するプリンターの名前です。 既定値は、Visio で現在選択されているプリンターです。 |
| PrintToFile | 省略可能 | Boolean | 印刷 用の情報をプリンターではなくディスク上のファイルに送信する場合は True。 プリンター に印刷する場合は False。 既定値は False です。 PrintToFile に True を 指定しても OutputFileName に有効な値を渡さない場合、図面はアクティブなプリンターに送信されます。 |
| OutputFileName | 省略可能 | String | PrintToFile が True の場合、出力先となるファイルのパスとファイル名です (二重引用符で囲まれています)。 |
| Copies | 省略可能 | 長整数型 (Long) | 印刷部数を指定します。 既定値は、1 です。 |
| Collate | 省略可能 | Boolean | True を指定すると、部単位で印刷します。 False を指定すると、部単位で印刷しません。 既定値は False です。 |
| ColorAsBlack | 省略可能 | Boolean | True を指定すると、全図形が可視になるように、すべての色を黒色で印刷します。 モノトーン プリンターで図面内の極度に明るい色がグレーの濃淡ではなく白色に変換される場合に役立ちます。 False を指定すると、標準の色を印刷します。 既定値は False です。 |
戻り値
なし
解説
PrintOut メソッドの呼び出しは、[印刷] ダイアログ ボックスで印刷オプションを選択するのと同じです ([ファイル] タブをクリックし、[印刷] をクリックし、もう一度 [印刷] をクリックします)、[OK] をクリックします。
PrintRange で使用できる値を次の表に示し、Visio タイプ ライブラリの VisPrintOutRange で宣言します。
| 定数 | 値 | 説明 |
|---|---|---|
| visPrintAll | 0 | 前景ページをすべて印刷します。 |
| visPrintCurrentPage | 2 | アクティブなページを印刷します。 |
| visPrintCurrentView | 4 | 現在の表示エリアを印刷します。 |
| visPrintFromTo | 1 | FromPage 値から ToPage 値までのページを印刷します。 |
| visPrintSelection | 3 | 選択範囲を印刷します。 |
例
次の Microsoft Visual Basic for Applications (VBA) マクロは、PrintOut メソッドを使用して、現在のページの 2 つのコピーをアクティブ プリンターに印刷する方法を示します。
Public Sub PrintOut_Example()
'Print two copies of the current page to the default printer
ThisDocument.PrintOut visPrintCurrentPage, , , , , , , 2
End Sub
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。