KutoolsforOffice— 1 つのソリューション、5 つの強力なツール。少ない労力で大きな成果。

Excel で偶数ページまたは奇数ページだけを印刷するには、どうすればよいですか？

著者Sun変更日

Excel スプレッドシートを使用していると、レポート作成やアーカイブ、他者との共有のためにデータを印刷する必要が頻繁に生じます。通常、Excel には現在の選択範囲、ワークブック全体、または特定のページ範囲（例：ページ1～3）を印刷するための標準機能が備わっています。しかし、ワークブックの偶数ページまたは奇数ページのみを印刷したい場合があり、そうしたケースではExcel に直接対応する組み込みオプションが存在しないため、一見すると難しく感じられるかもしれません。

偶数ページまたは奇数ページのみを印刷したい状況はさまざまです。たとえば、物理的な文書を両面印刷するときや、最終印刷の前に隔ページで内容を確認したい場合などが該当します。本記事では、Excel ワークブックで偶数ページ、奇数ページ、または必要な特定のページ範囲を印刷するための実用的な手法をいくつかご紹介します。具体的な解決策として、VBA コードの活用やKutools for Excel の機能、その他の代替手段を取り上げています。各手法には、使用ケースの簡単な分析とステップバイステップのガイドを記載しており、お客様の要件やExcel スキルに応じて最適な方法をお選びいただけます。

VBA で偶数／奇数ページのみを印刷する

Kutools for Excel で特定のページを印刷する

各ワークシートの最初のページを印刷する（Kutools for Excel 使用）

VB で偶数／奇数ページのみを印刷する

Excel の標準印刷オプションでは、偶数ページまたは奇数ページのみを直接印刷することはできません。しかし、シンプルな VBA マクロを使えば、この機能を簡単に実現し、必要なページだけを効率よく印刷できます。この方法は、大規模なワークブックを扱う際や、両面印刷のために奇数ページと偶数ページを別々に印刷したいときに特に役立ちます。

作業を始める前に、変更を元に戻せるようにワークブックを保存し、Excel の設定でマクロが有効になっていることをご確認ください。VBA による解決策は、基本的なマクロ操作に慣れているユーザーに最適です。VBA が初めての方でも、以下の手順は非常にシンプルですので、どうぞご安心ください。

1。Alt + F11キーを押して、Microsoft Visual Basic for Applicationsエディターを開きます。

2。VBA インターフェースで、挿入 > モジュールをクリックし、新しく開いたモジュールウィンドウに以下の VBA コードをコピー＆ペーストしてください。

VBA：偶数または奇数ページのみを印刷する

Sub PrintOddEven()
'UpdatebyKutoolsforExcel20160105
    Dim xPages As Long
    Dim xFPage As Variant
    Dim Page As Integer
    xPages = Application.ExecuteExcel4Macro("GET.DOCUMENT(50)")
    xFPage = Application.InputBox("Enter 1 for odd pages, enter 2 for even pages", "Kutools for Excel", , , , , , 1)
    If TypeName(xFPage) = "Boolean" Then Exit Sub
    If xFPage > 0 Then
        xFPage = Abs((xFPage Mod 2) - 2)
        For Page = xFPage To xPages Step 2
            ActiveSheet.PrintOut Page, Page
        Next
    End If
End Sub

3。キーボードのF5キーを押してマクロを実行すると、印刷するページを指定するダイアログが表示されます。すべての奇数ページを印刷する場合は1、すべての偶数ページを印刷する場合は2と入力してください。このダイアログのタイトルは、参考までにKutools for Excelとなっています。
奇数ページすべてを印刷するには「enter1」を、偶数ページすべてを印刷するには「enter2」をボックスに入力します

4。OKをクリックすると、Excel は入力内容に従って奇数ページまたは偶数ページのみを印刷します。

ヒントと注意点：このマクロを実行した後、プリンターの設定によって出力結果が影響を受けることがあります。正確な結果を得るには、マクロ実行前に改ページや印刷範囲が適切に設定されていることをご確認ください。エラーが発生した場合は、コードが完全に正しく貼り付けられていること、および選択したワークシートに複数ページにわたる内容が含まれていることを再度ご確認ください。

使用タイミング：この VBA 手法は、さまざまなExcel バージョンで柔軟かつ自動的に偶数／奇数ページを印刷したい場合や、異なる印刷範囲を持つ大規模なワークブックを定期的に処理する際に最適です。ただし、VBA マクロを使用するにはマクロを有効化し、ワークブックをマクロ対応形式（。xlsm）で保存する必要があります。また、コードの使用に抵抗がある方には、この方法が向かない可能性があります。

Kutools for Excel で特定のページを印刷する

VBA に不慣れな方や、ユーザーフレンドリーなグラフィカルインターフェースをご希望の方には、Kutools for Excelに搭載された便利な特定のページを印刷ツールがおすすめです。この機能を使えば、偶数／奇数ページの印刷やカスタムページ範囲の印刷（例：ページ5～12）などが、わずか数回のクリックで簡単に設定できます。

Kutools for Excelは300 以上の高度な機能を提供し、複雑な作業を効率化して、創造性と生産性を高めます。AI 機能と統合されたKutools は、正確にタスクを自動化し、データ管理を簡単にします。Kutools for Excel の詳細情報。。。         無料トライアル。。。

Kutools for Excel をインストールした後は、以下の手順に従ってください。（)Kutools for Excel を今すぐ無料ダウンロード！））

  1. 次に、KUTOOLS PLUSタブ ＞ 印刷 ＞ 特定のページを印刷をクリックします。
    Kutools の「特定のページを印刷」機能をクリックし、印刷する奇数ページまたは偶数ページをチェックします
  2. 表示されるダイアログボックスには、次のオプションが含まれています。
    • 奇数ページのみを印刷するには、奇数ページにチェックを入れてください。
    • 偶数ページのみを印刷するには、偶数ページにチェックを入れてください。
    • 次に、印刷をクリックしてください。
      印刷するページを指定します

Kutools for Excel は即座に印刷ジョブを開始し、選択したページ（奇数または偶数）のみがプリンターに送信されます。

メリット：この解決策は、コードを使わず信頼性の高い方法を求めるユーザー、特に複数シートの一括印刷やカスタム設定の記憶、リスクフリーでの機能試用など、高度な印刷オプションの利便性を必要とする方に最適です。

ヒント：Kutools for Excel を無料でダウンロードした後、上記の手順に従って操作すれば、「特定のページを印刷」機能を無料でお試しいただけます。

注意事項：印刷する前に、必ずExcel の印刷プレビューで改ページとレイアウトを確認してください。期待通りの結果が得られない場合は、印刷範囲や拡大縮小の設定を調整してください。Kutools の印刷ツールは、お客様の現在のワークシートおよび印刷範囲を尊重しますので、コマンド実行前に選択内容を再度ご確認ください。

奇数／偶数／特定のページのみを印刷

 

各ワークシートの最初のページを印刷する（Kutools for Excel 使用）

複数のワークシートを含むワークブックで、各ワークシートの最初のページだけを印刷したい場合があります。これは、レポートの要約を作成するときや、各シートの主要データを確認する際、あるいはドキュメント作成時などによくあるニーズです。各ワークシートの最初のページを印刷するユーティリティは、Kutools for Excelに搭載されており、ワンクリックで簡単に実行できるため、各シートを手作業で選んで印刷する手間が省けます。

Kutools for Excel をインストール後、以下の手順に従ってください。（)Kutools for Excel を今すぐ無料ダウンロード！））

各ワークシートの最初のページを印刷したいワークブックをアクティブにしてから、KUTOOLS PLUS > 印刷 > 各ワークシートの最初のページを印刷するをクリックしてください。
Kutools で各ワークシートの最初のページを印刷

Kutools は、現在のワークブック内のすべてのワークシートの最初のページを自動的に印刷します。個別にシートを選択したり、ページ範囲を指定したりする必要はありません。多数のタブを持つ大規模なワークブックでレポートを管理するユーザーにとって特に便利です。

ヒント：一貫した結果を得るには、この機能を使用する前に、各ワークシートの印刷範囲と改ページが正しく設定されていることを確認してください。誤ったページが印刷された場合は、Excel のページレイアウトタブに戻り、必要に応じて印刷エリアを調整してください。

関連記事：

最高の Office 業務効率化ツール

🤖KUTOOLS AI アシスタント：次に基づいてデータ分析を革新します：インテリジェント実行   ｜  コード生成｜  カスタム数式作成  ｜  データ分析とチャート生成｜  拡張機能呼び出し…
人気の機能：検索・ハイライト、または重複をマーキング   ｜  空白行を削除する   ｜  データを失うことなく列の結合またはセルを   ｜  数式を使用しない四捨五入...
スーパー LOOKUP：複数条件 VLookup  ｜  複数値 VLookup  ｜   複数シート間 VLookup   ｜   ファジーマッチ....
高度なドロップダウンリスト：ドロップダウンリストをすばやく作成   ｜  連動型ドロップダウンリスト   ｜  複数選択可能なドロップダウンリスト....
列マネージャー：指定した数の列を追加｜列の移動｜非表示列の表示状態を切り替え｜範囲および列の比較...
注目の機能：グリッドフォーカス   ｜  デザインビュー   ｜強化された数式バー   ｜ ワークブックとシートマネージャー   ｜  リソースライブラリ（オートテキスト）｜  日付ピッカー   ｜  ワークシートの統合  ｜  暗号化／セルの復号化   ｜ リストからメール送信   ｜  スーパーフィルター   ｜   特殊フィルタ（太字のフォントを持つセルをフィルタリング／斜体／取り消し線。。。） 。。。
トップ15 ツールセット：12 テキストツール（テキストの追加、特定の文字を削除、...）｜   50+チャートタイプ（ガントチャート、...）｜   40+実用的関数（誕生日に基づいて年齢を計算します、...）｜   19 挿入ツール（QR コードを挿入、パスから画像を挿入、...）｜   12 変換ツール（単語に変換する、為替レートの変換、...）｜   7 結合と分割ツール（高度な行のマージ、セルの分割、...）｜さらに多数
Kutools はお好みの言語でご利用いただけます。英語、スペイン語、ドイツ語、フランス語、中国語、および40+の他の言語をサポートしています！

Kutools for Excel でExcel スキルを強化し、これまでにない効率を体験しましょう。Kutools for Excel は、生産性を高め、時間を大幅に節約できる高度な機能を300 以上提供します。最も必要な機能を今すぐ入手するにはこちらをクリック。。。

Office Tab は Office にタブインターフェースをもたらし、作業を大幅に簡単にします

  • Word、Excel、PowerPoint でタブを使った編集と閲覧を有効にします。Publisher、Access、Visio、Project でもご利用いただけます。
  • 複数のドキュメントを、新しいウィンドウではなく、同じウィンドウ内の新しいタブで開いたり作成したりできます。
  • 日々の生産性を50％も向上させ、毎日数百回ものマウスクリックを削減します！

すべてのKutools アドインが、たった1 つのインストーラーで完結。

Kutools for Officeスイートには、Excel ・Word ・Outlook ・PowerPoint 用のアドインと Office Tab Pro が含まれており、複数の Office アプリを横断して作業するチームに最適です。

ExcelWordOutlookTabsPowerPoint
  • オールインワンスイート— Excel、Word、Outlook、PowerPoint 用アドイン＋Office Tab Pro
  • インストーラー1 つ、ライセンス1 つ— 数分でセットアップ可能（MSI 対応）
  • 連携してさらにパワーアップ— Office アプリ全体で生産性が向上
  • 30 日間のフル機能トライアル— 登録不要、クレジットカード不要
  • 最高のお得感— 個別アドイン購入よりお得