アクティブプリンタを変更（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 |
実行結果
関連記事
-
-
新規ブック作成（Add メソッド）
新規にワークブックを作成する Workbooks コレクションの Add メソッ …
-
-
ブックが互換モードで開いているか確認する（Excel8CompatibilityMode プロパティ）
ブックが互換モードで開いているか確認する Excel8Compatibility …
-
-
イベントの発生・無効をコントロール（EnableEvents プロパティ）
EnableEvents プロパティ EnableEvents プロパティに T …
-
-
シート見出しの色を設定（Tab プロパティ）
シート見出しの色を設定 Tab オブジェクトの Color プロパティ、Colo …
-
-
画面の上端・左端を設定（ScrollRow プロパティ、ScrollColumn プロパティ）
画面の上端・左端を設定 ScrollRow プロパティで、指定した行を画面上端に …
-
-
印刷：余白を設定 TopMargin,BottomMargin,LeftMargin,RightMargin,HeaderMargin,FooterMargin
余白を設定する 余白を設定する単位は、pt（ポイント：約 0.03528 cm） …
-
-
ブックを別名で保存（SaveAs メソッド）
ブックを別名で保存（SaveAs メソッド） ブックの変更を保存したり、新規ブッ …
-
-
白黒印刷（PageSetup.BlackAndWhite プロパティ）
PageSetup.BlackAndWhite プロパティ PageSetup. …
-
-
ワークシートの非表示・再表示（Visible プロパティ）
ワークシートの表示・非表示 ワークシートを非表示にしたり、非表示にしたワークシー …
-
-
枠線を含めて印刷（PageSetup.PrintGridlines プロパティ）
PageSetup.PrintGridlines プロパティ PageSetup …