Evaは、ワークブック全体を一度に印刷することがよくあります。その際、紙を節約できるように両面印刷します。ただし、これは、ワークシートの最初のページが前のワークシートの最後のページの裏に印刷されることを意味する場合があります。 Evaは、ワークブック全体を両面印刷するときに、ワークシートが常に新しい用紙に印刷を開始するようにする方法があるかどうか疑問に思います。

これにアプローチする手動の方法と、より自動化された方法があります。手動の方法では、印刷に奇数ページが必要なワークシートを特定し、そのワークシートに偶数ページを使用させる必要があります。そのようなワークシートを特定したら、そのワークシートの最後（最後の行のすぐ下）に移動して改ページを挿入するだけです。 （リボンの[ページレイアウト]タブを表示し、[改ページ]ツールをクリックします。次に[改ページの挿入]を選択できます。）

自動方式では、通常のPrintコマンドを使用する代わりに、マクロを使用してブックを印刷します。マクロは、本質的に、各ワークシートを個別に次々に印刷します。したがって、5つのワークシートがある場合、マクロはそれらを5つの個別の印刷ジョブとして印刷します。

それぞれが新しいページの前面から始まります。マクロは次のとおりです：

Public Sub PrintAllSheets()

Dim wks As Worksheet

For Each wks In ActiveWorkbook.Worksheets         wks.PrintOut     Next     Set wks = Nothing End Sub

前述のように、このマクロはブック内のすべてのワークシートを印刷します。ワークシートのサブセットを印刷する場合は、マクロを変更して、マクロの実行時に選択したワークシートのみを印刷することができます。

Sub PrintSomePages()

Dim wks As Worksheet

For Each wks In ActiveWindow.SelectedSheets         wks.PrintOut     Next     Set wks = Nothing End Sub

これらのマクロのいずれか（または両方）をクイックアクセスツールバーに簡単に追加して、必要なもの（すべてまたは一部）を正確に印刷できるようにすることができます

ボタンをクリックするだけです。

注：

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

linkここをクリックして、新しいブラウザタブでその特別なページを開きます。

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

このヒント（1984）は、Microsoft Excel 2007、2010、2013、および2016に適用されます。