Windowsが複数のプリンターをサポートしていることは既にご存知でしょう。ただし、複数のプリンターでExcelを使用すると、[印刷]ダイアログボックス(Excel 2007)または[印刷情報](Excel 2010以降のバージョン)を表示し、プリンターを変更してからワークシートを印刷する必要があるため、面倒な場合があります。

ただし、指定したプリンターでワークシートをワンクリックで印刷できる方法があります。これを行うには、プリンターを変更してからワークシートを印刷するマクロを作成するだけです。タスクを実行するマクロは次のとおりです。

Sub GoodPrinter()

Application.ActivePrinter = "HP LaserJet"

ActiveWindow.SelectedSheets.PrintOut Copies:=1 End Sub

システムでこのマクロを作成するときは、マクロの2行目でプリンター名を変更してください。システム上のプリンタの名前と正確に一致している必要があります。 (この例では、プリンター名は「HP LaserJet」に設定されています。使用するプリンターの名前と一致するように変更する必要があります。)

秘訣は、使用するプリンターごとにこれらのマクロの1つを作成することです。クイックアクセスツールバーに各プリンタのコマンドを追加して、各プリンタに独自の印刷ボタンを設定できます。次にコマンドまたはボタンをクリックすると、適切なマクロが実行され、目的のプリンターで出力が得られます。

注:

このページ(または_ExcelTips_サイトの他のページ)で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

_ExcelTips_は、費用効果の高いMicrosoftExcelトレーニングのソースです。

このヒント(12578)は、Microsoft Excel 2007、2010、2013、2016、2019、およびOffice 365のExcelに適用されます。Excelの古いメニューインターフェイス用のこのヒントのバージョンは、次の場所にあります。