アクティブプリンタを変更（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 |
実行結果
関連記事
-
-
ブックを参照（Workbooks プロパティ,Windows プロパティ）
アクティブなワークブックを参照 現在使用中のワークブック、複数ある場合は一番手前 …
-
-
印刷の用紙サイズを設定（PageSetup.PaperSize プロパティ）
PageSetup.PaperSize プロパティ PageSetup.Pape …
-
-
画面の上端・左端を設定（ScrollRow プロパティ、ScrollColumn プロパティ）
画面の上端・左端を設定 ScrollRow プロパティで、指定した行を画面上端に …
-
-
印刷設定（偶数ページのヘッダー・フッターを設定）OddAndEvenPagesHeaderFooter, EvenPage
偶数ページに別のヘッダーおよびフッターを設定 偶数ページのヘッダーおよびフッター …
-
-
ウィンドウ枠の固定（FreezePanes プロパティ、SplitColumn プロパティ,SplitRow プロパティ）
ウィンドウ枠の固定と解除 ウィンドウ枠を固定するには FreezePanes プ …
-
-
枠線を含めて印刷（PageSetup.PrintGridlines プロパティ）
PageSetup.PrintGridlines プロパティ PageSetup …
-
-
ウィンドウの分割（Split プロパティ,SplitColumn プロパティ,SplitRow プロパティ）
ウィンドウの分割と解除 ウィンドウ（ワークシート画面）を分割するには、Split …
-
-
印刷設定を高速化（PrintCommunication プロパティ）
PrintCommunication プロパティ PrintCommunicat …
-
-
ブックが互換モードで開いているか確認する（Excel8CompatibilityMode プロパティ）
ブックが互換モードで開いているか確認する Excel8Compatibility …
-
-
印刷時のページの番号付けの方向を設定（PageSetup.Order プロパティ）
PageSetup.Order プロパティ PageSetup.Order プロ …