VBA-印刷設定

マクロでプリンターの設定

• 印刷するプリンターを変えたい時に

　Aの印刷は一番のプリンターでBの印刷は二番のプリンターで印刷したい場合などに。

当初は、VB2005で印刷するプリンターを切り替えたりしたかったのだが。結局VBAでやることに。

　サンプルソース

Sub Set_Printer(byVal PrinterName as String)

Dim objPrinter As Object

Set objPrinter = CreateObject("WScript.Network")
objPrinter.SetDefaultPrinter PrinterName

End Sub

• 開発環境は、Excel2003　バージョンによって変わってくるかもしれない。

　備考

Application.ActivePrinter = PrinterName ' ERR

などもあったが, " on Ne01:" をつけないとエラーになる。
この" on XXXX"　が曲者だ。プリンターによってNe00とかNe01になる。

なので。このサンプルソースのやり方がスマートなのではないかと思う。

　参考

• 参考

• VB2005でプリンタの一覧取得の仕方 プリンター一覧

• Office XP または Office 2003 ドキュメントを開くときに ActiveX コントロールにアクセス許可を設定するように求められる

• EXCEL

• VBAマクロ

サイト内リンク

• VBAマクロ
• VB2005からVBAマクロの呼び出し方
• Access
• EXCEL
• JANコード ITFコード
• バーコード(フリーソフト)

OS系

• Windows
• WindowsXP
• Windows7
• Windows 2008 Server
• Windows 2003 Server
• Windows 2000 Server
• ライセンス管理