通常使用するプリンターとは別にVBAで指定してたプリンターで印刷できなぁ～い！？

Windowsアップデートでプリンターポートが変更された!!
最近は大丈夫やったのに…ポート変更手間や…!?

簡単に登録する方法がある!?

　昨日は、膀胱がんを内視鏡で調べるため病院へ行ってたので、帰宅時間がお昼少し回ってしまいました・・・

　午後、PCで振替伝票を切ろうとExcelの自作の簡易ソフトに入力し、いざ印刷ボタンをクリックして印刷…？？
　通常使用するプリンターとは別のプリンターをExcelのVBAで指定しているのですが、プログラムの間違いと出てしまうんですね。

　VBAでプリンターを指定する時にはプリンター名の後ろにポート名を付けて"EPSON PX-1004 on Ne06:"などと書くのですが、Windowsアップデートの時に全てのプリンターに電源が入っていれば、変わらないのかも知れないのですが…普段使用しないプリンターの場合、接続ポートがアップデートにより、勝手に設定されてしまうようで数字が変わってしまうことがあるんです。

　この数字が変更されてしまうからプログラムの間違いと出てしまうんです・・・
　今日は初心者の方には難しいかもしれませんが、かいつまんでアクティブプリンターのポートの調べ方を書いて置こうと思います。

• 【アクティブプリンターのポートを調べる方法】
  
  1. 
     1. コントロールパネルからプリンターを開きます。
     2. 次に、ポート番号を調べたいプリンターを右クリックして取敢えず『通常使うプリンターに設定』して置きます。
     
     
  2. 
     • Excelのコードを『MsgBox Application.ActivePrinter』と入力します。
     
     
  3. 
     • 入力したら、上部に表示されてるSub/ユーザーフォームの実行『▲』をクリックします。
     
     
  4. 
     • すると左の画像のようにアクティブプリンターの現在のポート番号が表示されます。
       ※因みに、この後、本来の通常使用するプリンターに戻しておくことを忘れないで下さい。
     
     

　しかし、このプリンターポートをアップデートの度に、時間をかけて直さなくてはならないとは、この時ばかりは辟易へきえきしますね。
　結局、昨日はこの作業に時間をとられ・・・気持ちも削そがれ・・・本来の仕事はしておりませんwww