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

Excelでデータを含む行/セルのみを印刷するにはどうすればよいですか?

Excelで範囲またはワークシートを印刷すると、一部の空白行または空白セルも印刷され、用紙のスペースを占有します。 この記事では、空白の行/セルをすべて無視し、Excelでデータを含む行/セルのみを印刷する方法について説明します。

ExcelでVBAによるデータを含む行のみを印刷します

Excelで空白行を削除して、データを含む行のみを印刷します

データを含むセルをExcelの新しいシートにコピーして、データを含むセルのみを印刷する

Excelで空の行を無視して、複数の空白以外の行をバッチ印刷します

Excel用のKutools 複数選択の印刷ウィザード 同じワークシートから複数の選択肢を簡単に印刷できるだけでなく、多くのワークシートから複数の範囲を簡単に印刷することもできます。

広告印刷複数選択2


このメソッドは、Excelで指定された範囲内のデータのみを含む行をすばやく印刷するVBAを導入します。 次のようにしてください。

1。 プレス 他の + F11 キーを同時に押して、Microsoft Visual Basic forApplicationsウィンドウを開きます。

2。 クリック インセット > モジュール、次に、次のVBAコードをコピーして、新しく開いているモジュールウィンドウに貼り付けます。

VBA:Excelのデータを含む行のみを印刷します

Sub PrintSummary()
Dim xRg As Range, xRg1 As Range, xCell As Range
Dim xSht As Worksheet
Dim xTxt As String
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select the range to print:", "Kutools for Excel", xTxt, , , , , 8)
Set xRg = Application.Intersect(xRg, ActiveSheet.UsedRange)
If xRg Is Nothing Then Exit Sub
If xRg.Areas.Count > 1 Then
MsgBox "You can't select multiple selections", , "Kutools for Excel"
Exit Sub
End If
Application.DisplayAlerts = False
Application.ScreenUpdating = False
Set xSht = Worksheets.Add(After:=Sheets(Sheets.Count))
xRg.Copy xSht.Range("A1")
Set xRg1 = xSht.Range("A1").Resize(xRg.Rows.Count, xRg.Columns.Count)
For Each xCell In xRg1.Columns(1).Cells
If Application.WorksheetFunction.CountA(xCell.EntireRow) = 0 Then
xCell.EntireRow.Hidden = True
End If
Next
xSht.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False
xSht.Delete
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

3。 プレス F5 キーを押すか、 ラン このVBAを実行するためのボタン。

4. [Kutools for Excel]ダイアログボックスを開いて、空白行を無視し、データを含む行のみを印刷する範囲を指定して、[ OK

次に、指定された範囲が、その中のすべての空白行を無視してすぐに出力されます。

Note:このVBAは、空白行を無視した複数選択のバッチ印刷をサポートしていません。


このメソッドは、Excel用のKutoolsを導入します 空白行を削除する アクティブなワークシートまたは選択した範囲内のすべての空白セルを削除し、Excelでのみデータを含むそれらの行を印刷するユーティリティ。 次のようにしてください。

Kutools for Excel - Excel に必要な 300 以上のツールが詰め込まれています。 クレジット カードは必要なく、全機能を備えた 30 日間の無料トライアルをお楽しみください。 ダウンロード中!

1.データのみを含む行を印刷するワークシートに移動し、[ クツール > 削除 > 空白行を削除する > アクティブシート内。 スクリーンショットを参照してください:

Note:指定した範囲のデータのみを含む行を印刷するには、最初にこの範囲を選択してから、をクリックしてください クツール > 削除 > 空白行を削除する > 選択した範囲内.

2. Kutools for Excelダイアログボックスがポップアップ表示され、削除された空白行の数が表示されます。 クリック OK ボタンを押して閉じます。

これで、アクティブなワークシート/選択した範囲からすべての空白行が削除されます。 スクリーンショットを参照してください:

3。 クリック File (または オフィスボタン)> 印刷物 アクティブなワークシートまたは選択した範囲のデータを含む行のみを印刷します。

Kutools for Excel - 300 以上の必須ツールで Excel を強化します。 クレジット カードは必要なく、全機能を備えた 30 日間の無料トライアルをお楽しみください。 今すぐ入手


Excelの空白のセルをすべて無視して、データのみを含むセルを印刷したい場合があります。 このメソッドは、Excel用のKutoolsを導入します 非空白セルを選択 ユーティリティと 複数選択の印刷ウィザード Excelで指定された範囲のデータを含むセルのみを印刷します。

Kutools for Excel - Excel に必要な 300 以上のツールが詰め込まれています。 クレジット カードは必要なく、全機能を備えた 30 日間の無料トライアルをお楽しみください。 ダウンロード中!

1.データを含むセルのみを印刷する範囲を選択し、をクリックします クツール > 選択 > 非空白セルを選択。 スクリーンショットを参照してください:

2. [Kutools for Excel]ダイアログボックスが表示され、データを含むセルがいくつ選択されているかが示されます。 クリック OK ボタンを押して閉じます。

3.これらの空白でないセルを選択し続け、クリックします Enterprise > 印刷 > 複数選択の印刷ウィザード。 スクリーンショットを参照してください:

4. [複数選択の印刷ウィザード]ダイアログボックスを開くと、選択したすべての空白以外のセルがリストされていることがわかります。 印刷する範囲 リストをクリックしてください 終了

5.これで、選択したすべての空白以外のセルがコピーされ、リンクされた画像として新しいワークシートに貼り付けられます。 クリックしてください File (または Officeボタン)> 印刷物 これらのセルにデータを出力します。

Kutools for Excel - 300 以上の必須ツールで Excel を強化します。 クレジット カードは必要なく、全機能を備えた 30 日間の無料トライアルをお楽しみください。 今すぐ入手


Kutools for Excel: 300 を超える便利なツールをすぐに利用できます。 機能制限なしの 30 日間の無料トライアルを今すぐ始めてください。 今すぐダウンロード!

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

人気の機能: 重複を検索、強調表示、または識別する   |  空白行を削除する   |  データを失わずに列またはセルを結合する   |   数式なしのラウンド ...
スーパールックアップ: 複数の基準の 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 (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations