アクティブプリンタを変更（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 |
実行結果
関連記事
-
-
ブックのプロパティ（BuiltinDocumentProperties プロパティ）
BuiltinDocumentProperties プロパティ ブックのプロパテ …
-
-
印刷時のページの番号付けの方向を設定（PageSetup.Order プロパティ）
PageSetup.Order プロパティ PageSetup.Order プロ …
-
-
印刷設定（偶数ページのヘッダー・フッターを設定）OddAndEvenPagesHeaderFooter, EvenPage
偶数ページに別のヘッダーおよびフッターを設定 偶数ページのヘッダーおよびフッター …
-
-
ブックが互換モードで開いているか確認する（Excel8CompatibilityMode プロパティ）
ブックが互換モードで開いているか確認する Excel8Compatibility …
-
-
ブックを参照（Workbooks プロパティ,Windows プロパティ）
アクティブなワークブックを参照 現在使用中のワークブック、複数ある場合は一番手前 …
-
-
並べて比較（CompareSideBySideWith,SyncScrollingSideBySide,BreakSideBySide）
並べて比較（CompareSideBySideWith メソッド） Compar …
-
-
ブックの表示を変更（View プロパティ）
ブックの表示を変更（View プロパティ） View プロパティ で、ブックの表 …
-
-
ワークシートにクリップボードの内容を貼り付ける（Paste メソッド）
Paste メソッド 指定したワークシート上にクリップボードのデータを貼り付けま …
-
-
ワークシートのコピー・移動（Copy メソッド Move メソッド）
Copy メソッド Copy メソッドで、指定した位置にワークシートの複製を作成 …
-
-
スクロール（LargeScroll メソッド、Smallscroll メソッド）
ワークシートをスクロールする ワークシートをスクロールするには、LargeScr …