アクティブプリンタを変更（ActivePrinter プロパティ）
ActivePrinter プロパティ
ActivePrinter プロパティを使用して現在のアクティブプリンタを取得したり、別のプリンタに切り替えたりすることができます。文字列型（String）の値を使用します。
「アクティブプリンタ」とは、「通常使うプリンタ」のことです。印刷する時だけ他のプリンタを使う場合は、PrintOut メソッド の引数 activeprinter に、そのプリンタ名を指定します。（詳細は、印刷・印刷プレビュー（PrintOut メソッド、PrintPreview メソッド） を参照してください。）
＜取得＞
object.ActivePrinter
＜設定＞
object.ActivePrinter = string
引数・戻り値
- object ・・・ 対象となる Application オブジェクト を指定します。
- string ・・・ アクティブプリンタ（通常使うプリンタ）に設定したいプリンタの名前を指定します。文字列型（String）で、[プリンタ名] on [ポート名]: の形式で記述します。
ActivePrinter プロパティ 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 |
Sub Sample_ActivePrinter() '現在のアクティブプリンタ（通常使うプリンタ）を表示 MsgBox Application.ActivePrinter End Sub |
実行結果
関連記事
-
-
印刷のタイトル行、タイトル列を設定（PrintTitleRows,PrintTitleColumns）
PageSetup.PrintTitleRows プロパティ PageSetup …
-
-
枠線を含めて印刷（PageSetup.PrintGridlines プロパティ）
PageSetup.PrintGridlines プロパティ PageSetup …
-
-
ウィンドウを拡大・縮小（Zoom プロパティ）
ウィンドウを拡大・縮小（Zoom プロパティ） ウィンドウの表示サイズをパーセン …
-
-
再計算（Calculation, EnableCalculation, Calculate）
ワークブックやシートの再計算 通常、Excel では、自動的に再計算が行われる設 …
-
-
印刷範囲の設定・解除（PageSetup.PrintArea プロパティ）
PageSetup.PrintArea プロパティ 印刷範囲を設定するには、Pa …
-
-
ワークシートにクリップボードの内容を貼り付ける（Paste メソッド）
Paste メソッド 指定したワークシート上にクリップボードのデータを貼り付けま …
-
-
印刷時のページの番号付けの方向を設定（PageSetup.Order プロパティ）
PageSetup.Order プロパティ PageSetup.Order プロ …
-
-
新しいウィンドウを開く（NewWindow メソッド）
NewWindow メソッド NewWindow メソッドで、任意のブックのコピ …
-
-
印刷の用紙サイズを設定（PageSetup.PaperSize プロパティ）
PageSetup.PaperSize プロパティ PageSetup.Pape …
-
-
別のブックのマクロを実行（Run メソッド）
別のブックのマクロを実行 別のブックのマクロを実行するには、Run メソッド を …