• ベストアンサー

エクセルで印刷するプリンタを自動的に変更したい

ネットワーク接続のプリンタが2台あります。 このうち片方のプリンタは、あるエクセルファイル専用出力にしたいのです。従いまして、当該エクセルファイルを印刷するときにだけ、自動的にそちらのプリンタから出力させるように制御したいのです。マクロか何かでそのような設定はできるのでしょうか。

質問者が選んだベストアンサー

  • ベストアンサー
  • hige_082
  • ベストアンサー率50% (379/747)
回答No.2

マクロの記録に一工夫 1 マクロの記録開始 2 印刷-プリンタを変更して閉じる 3 マクロの記録終了 4 マクロの記録で出来たコードを修正 5 一度、保存して終了 'マクロの記録で出来たコード Sub Macro1() ' ' Macro1 Macro ' マクロ記録日 : 2009/2/22 ユーザー名 : ' ' Application.ActivePrinter = "XXXXX" '←ここが使用したいプリンタ名になっているか確認 End Sub マクロの記録で出来たコードを下記のように修正 Sub auto_open()  '←修正個所 ' ' Macro1 Macro ' マクロ記録日 : 2009/2/22 ユーザー名 : ' ' Application.ActivePrinter = "XXXXX" End Sub 詳細が分からないので、このマクロを設定したファイルを開くと プリンタを指定したプリンタに変更する様にしています 幾つかファイルを開いて作業する場合は、注意が必要です このマクロを設定したファイルを開いた時点で、プリンタが変更されます ただ、OS、EXCELのバージョンによってはうまく行かない場合もあります

paesold78
質問者

お礼

ありがとうございます。凄く参考になりました。 ついでにファイルを閉じたときに自動的にプリンタを元に戻すように設定しました。

その他の回答 (1)

  • orangezzzz
  • ベストアンサー率35% (401/1119)
回答No.1

おはようございます。 試してませんが・・ マクロの記録を開始 印刷ダイアログを出してプリンタを変更 印刷 マクロの記録を終了 コマンドボタンを追加してマクロを登録 コレでどうですか。

paesold78
質問者

お礼

ありがとうございます。参考になりました。

関連するQ&A

  • 二台のプリンターに印刷したい

    エクセルで伝票を作り、それをVBAで二部印刷するようにしていました。(一部は運転手に、一部は保存用に) 今度、運転手の受け取り場所が変わり、そこのプリンターに出すように言われました。(プリンターナンバー「PR110034」と「PR110066」) まず、こちらのPCから向こうにプリンターで印刷できるか確かめました。(「ファイル」-「印刷」-「プリンター」-「名前(変更)」で)OKです。 そこで早速VBAで作ったのですが、おかしなことにどちらか片方に二部印刷されてしまうのです。(34を先に設定すると34に二部、66を先に設定すると66に二部) 二台のプリンターに一部ずつ印刷するようにするには、マクロでどう書けばよいのでしょうか。 教えてください。

  • マクロ どのパソコンでも同じプリンターから印刷

    ネットワークで繋がっている複数台のパソコンでエクセルで作ったフォーマットを同じプリンターで印刷したいのですが、どのようにマクロを組んだらいいのか分かりません 少しだけマクロが分かりますので分かりやすく教えてくれる方いませんか。 プリンタをしてするとNe06などプリンター名のあとに付けるのですが、別のパソコンになると番号を変えなければなりません 同じマクロでどのパソコンでも同じプリンターで印刷をできる方法を教えてください。

  • EXCELで印刷があるところから消える

    お世話になります。 EXCELで文書のようなものを印字しております。 その1つのファイルですが色々な社員が使用するので 各社員のパソコンに保存しております。 プリンタはネットワーク接続で各社員同じプリンタを使用しています。 しかし1台のパソコンだけプレビューで見ると全体が表示されるのですが 印刷すると後ろの4分の1ほど切れて(白紙)出力されます。 他のパソコンと違うのは他はEXCEL2003使用なのですが この1台だけEXCEL2007です。 しかもこの1ファイルだけこのような症状がでて、他はまったく異常がありません。 何かアドバイスいただける方お願いいたします。

  • マクロで印刷時のポートについて

    こんにちは エクセルのマクロを作成していますが、うまくいかずに困っています。 内容は、LANで接続された複数台のプリンターを複数台のパソコンで一つのマクロを含んだエクセルファイルを共有使用しています。 この時操作するパソコンにより、登録されているプリンターのポート番号が違うために、それぞれ専用の印刷用マクロを作成して使用しています。 そこで質問ですが、印刷時にポート番号を指定せずにプリンター名でプリンター指定するには、どうすればよいのでしょうか? よろしくお願いいたします。

  • excelでの印刷

     複数のPCのエクセルで印刷をする時に,PCごとに設定をしなくてもどこでも同じように印刷するにはどうしたらよいでしょうか。  PCがかわったりファイルを更新したりすると設定が変わり,以前は全部印刷されていた同じセル内の同じフォントの文書が,セルからはみ出ていんさつされないのです。  マクロで制御するのでしょうか。どなたか教えてください。よろしくお願いします。

  • エクセルから印刷時のプリンターの設定をしたい

    いつもお世話になっております。 常時使用するプリンターが2台あり、機能と印刷単価が違っており、1台は数枚以下&カラー用、もう1台は大量印刷と裏紙印刷で使い分けているのですがこれをエクセルのマクロ(ボタン)で設定することは出来ないでしょうか? 一応、マクロの記録で印刷を記録してみましたが、印刷の実行はできましたが、やはりプリンターの選択とかトレイの指定はできませんでした。 何かアイディアは内でしょうか? 使うソフトはメインはエクセル、後はワードです。 毎日のことでつい「大量にカラーでしかも非常に時間がかかる」ようなウッカリが後を絶たないので何か改善策が有りましたらご教示お願いします。

  • 特定のEXCELのファイルを印刷するときにプリンタを替えられるか?

    現在、モノクロ、カラーのプリンタ計2台あります。 EXCELに限らず、WORDなどのファイルでカラー印刷したいものに 通常使うプリンタに設定してあるプリンタ以外を設定することができるのでしょうか? 具体的に言うと、通常使うプリンタには、モノクロプリンタを使用しています。 写真などを貼り付けたファイルを印刷するときには、カラープリンタを使いたいです。 何かいい方法がありましたら、教えてください。

  • エクセルの印刷範囲の自動変更について

    エクセルで印刷範囲を設定して使っているファイルがあるのですが、 設定している印刷範囲をエクセルが勝手にチャラにして、自動的に 印刷範囲を変更してしまうことがあります。 それも、不定期に突然変更してしまいます。ちゃんと印刷できているな と思って使っていると、突然書き換えます。当然ズレて印刷されるし、 印刷ページ数も勝手に変わります。 おそらく紙いっぱいにギリギリで印刷させていることが原因なのだろうと 思っているのですが、印刷はチャンとできているわけで、このおせっかいな 突然の印刷範囲の自動変更機能を切る方法はないでしょうか。 使っているのはエクセル2007です。

  • Excel マクロでスタンプ機能

    Excelで作った文書に「秘」の表示をしたいと思っています。 印刷の際にプリンタの詳細設定でスタンプ機能があるので、利用しようと思います。 このファイルは「マクロでワークシートを挿入して印刷」という作業を繰り返すので印刷の際はその都度プリンタの設定をしています。 当該シートを印刷する時に自動でこのスタンプ機能ができるようにしたいのですが、マクロか何かで印刷のときにこのスタンプが印字されるようにできるのでしょうか? 今日、1日いろいろと調べたのですが、印刷時にヘッダーとして「秘」を自動で差し込むようには出来たのですが、これでは「秘」の表示はできるのですが、出来れば「秘」を四角で囲みたいです。 VBAの知識は少しあります。 よろしくお願いします。

  • ネットワークプリンタで印刷ができなくなりました。

    現在大学の研究室でネットワークプリンタを使用しているのですが、プリンタに接続している無線LANルータをリセットしてしまってからうまく印刷が出来なくなりました。PC、プリンタ両方とも有線で接続しています。 具体的には印刷後、しばらくしてからタスクバーに「印刷に失敗しました。」と警告(?)がでます。 専用のインストーラを使って設定をしなおしましたが、だめでした。 プリンタのIPアドレスはわかっていますがそれらをプリンタの設定と比べてみましたがうまくいきませんでした。 プリンタは Canon BIJ1350D です。WindowsXPを使っています。 大変困っています。そこそこの知識は持っていますがネットワーク関連は素人です。よろしくお願いします。

専門家に質問してみよう