メインコンテンツへスキップ

Excelでの印刷から特定のセルまたは領域を除外するにはどうすればよいですか?

ワークシートの印刷中に、特定のセルまたは領域の値を何らかの目的で印刷から除外する必要がある場合があります。 この記事の方法では、特定のセルまたは領域を印刷から除外する方法を詳細に説明します。

セル形式をカスタマイズして、特定のセルまたは領域を印刷から除外します
特定のセルまたは領域をVBAコードによる印刷から除外します


セル形式をカスタマイズして、特定のセルまたは領域を印刷から除外します

以下のスクリーンショットに示すように、ワークシートを印刷するときに5行目と9行目を除外する必要があります。 印刷する前に、特定のセルまたは領域の形式をカスタマイズして、セルの内容を非表示にしてそれを実現できます。 次のようにしてください。

1.印刷から除外するセルまたは領域を選択し(ここでは、複数の範囲A6:C6およびA10:C10を選択します)、を押します。 Ctrlキー + 1 キーを同時に押して、[セルの書式設定]ダイアログボックスを開きます。

2。 の中に セルの書式設定 ダイアログボックスで、をクリックします。 カスタム セクションに カテゴリー 下のボックス タブをクリックし、XNUMXつのセミコロンを入力します ;;; ボックスをクリックし、最後に OK ボタン。 スクリーンショットを参照してください:

これで、下のスクリーンショットに示すように、選択した範囲のすべてのコンテンツがすぐに非表示になります。 これでワークシートの印刷を開始できます。

注:印刷後、手順2で入力したセミコロンを[セルの書式設定]ダイアログボックスから削除して、セルの内容を表示できます。


特定のセルまたは領域をVBAコードによる印刷から除外します

上記の方法に加えて、次のVBAコードを適用して、ワークシートの印刷中に指定したセルまたは領域の内容を自動的に非表示にすることができます。

1。 押す 他の + F11 キーを同時に開いて アプリケーション向け Microsoft Visual Basic 窓。

2。 の中に アプリケーション向け Microsoft Visual Basic ウィンドウ、ダブルクリック このワークブック セクションに プロジェクト ペインで、以下のVBAコードをコピーして ThisWorkbook(コード) 窓。

VBAコード:特定のセルまたは領域をExcelでの印刷から除外します

Private Sub Workbook_BeforePrint(Cancel As Boolean)
    Dim xIndex As Long
    If ActiveSheet.Name = "Sheet1" Then
        Cancel = True
        Application.EnableEvents = False
        Application.ScreenUpdating = False
        With ActiveSheet
            xIndex = .Range("A6:C6,A10:C10").Font.ColorIndex
            .Range("A6:C6,A10:C10").Font.Color = vbWhite
            .PrintOut
            .Range("A6:C6,A10:C10").Font.ColorIndex = xIndex
        End With
        Application.EnableEvents = True
        Application.ScreenUpdating = True
    End If
    MsgBox "Print completed!", vbInformation, "Kutools for Excel"
End Sub

Note:コードでは、Sheet1は印刷する必要のあるアクティブなシート名であり、A6:C6、A10:C10は印刷から除外する範囲です。 必要に応じて変更してください。

3。 押す 他の + Q キーを同時に押して、Microsoft Visual Basic forApplicationsウィンドウを閉じます。

これで、ワークシートの印刷を開始できます。 印刷が終了すると、 Kutools for Excel 以下のスクリーンショットのようなダイアログボックスが表示されます。 また、指定した範囲が印刷出力で空白になっていることがわかります。


関連記事:

最高のオフィス生産性向上ツール

人気の機能: 重複を検索、強調表示、または識別する   |  空白行を削除する   |  データを失わずに列またはセルを結合する   |   数式なしのラウンド ...
スーパールックアップ: 複数の基準の VLookup    複数の値の VLookup  |   複数のシートにわたる VLookup   |   ファジールックアップ ....
詳細ドロップダウン リスト: ドロップダウンリストを素早く作成する   |  依存関係のドロップダウン リスト   |  複数選択のドロップダウンリスト ....
列マネージャー: 特定の数の列を追加する  |  列の移動  |  Toggle 非表示列の表示ステータス  |  範囲と列の比較 ...
注目の機能: グリッドフォーカス   |  デザインビュー   |   ビッグフォーミュラバー    ワークブックとシートマネージャー   |  リソースライブラリ (自動テキスト)   |  日付ピッカー   |  ワークシートを組み合わせる   |  セルの暗号化/復号化    リストごとにメールを送信する   |  スーパーフィルター   |   特殊フィルター (太字/斜体/取り消し線をフィルター...) ...
上位 15 のツールセット12 テキスト 工具 (テキストを追加, 文字を削除する、...)   |   50+ チャート 種類 (ガントチャート、...)   |   40+ 実用的 (誕生日に基づいて年齢を計算する、...)   |   19 挿入 工具 (QRコードを挿入, パスから画像を挿入、...)   |   12 変換 工具 (数字から言葉へ, 通貨の換算、...)   |   7 マージ&スプリット 工具 (高度な結合行, 分割セル、...)   |   ... もっと

Kutools for Excel で Excel スキルを強化し、これまでにない効率を体験してください。 Kutools for Excelは、生産性を向上させ、時間を節約するための300以上の高度な機能を提供します。  最も必要な機能を入手するにはここをクリックしてください...

kteタブ201905


Officeタブは、タブ付きのインターフェイスをOfficeにもたらし、作​​業をはるかに簡単にします

  • Word、Excel、PowerPointでタブ付きの編集と読み取りを有効にする、パブリッシャー、アクセス、Visioおよびプロジェクト。
  • 新しいウィンドウではなく、同じウィンドウの新しいタブで複数のドキュメントを開いて作成します。
  • 生産性を 50% 向上させ、毎日何百回もマウス クリックを減らすことができます!
Comments (3)
Rated 5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
I've recieved an error in my line:

xIndex = .Range("B52:K92").Font.ColorIndex
This comment was minimized by the moderator on the site
Hi Maria,
After modifying the ranges in the VBA code, please press the "Save" button to save the code first, then go to print.
This comment was minimized by the moderator on the site
__________
Rated 5 out of 5
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations