如何在 Excel 中僅列印包含資料的列/儲存格？

此方法將介紹一種 VBA，快速列印 Excel 中指定區域內僅包含資料的列。請按照以下步驟操作：

1. 同時按下 Alt + F11 鍵以打開 Microsoft Visual Basic for Applications 視窗。

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 對話框中，指定您要忽略空白列並僅列印包含資料的列的區域，然後點擊 確定 按鈕。

然後該指定區域會立即進行列印，並忽略其中的所有空白列。

注意：此 VBA 不支援批量列印多個選擇並忽略空白列。

此方法介紹了 Kutools for Excel 的 刪除空白列 功能，用於刪除當前工作表或選定區域中的所有空白列，然後僅列印包含資料的列。請按照以下步驟操作：

1. 轉到您要列印包含資料列的工作表，並點擊 Kutools > 刪除 > 刪除空白列 > 當前工作表。

注意：若要在指定區域內僅列印包含資料的列，請先選擇該區域，然後點擊 Kutools > 刪除 > 刪除空白列 > 選擇區域。

2. 彈出一個 Kutools for Excel 對話框，顯示已刪除多少空白列。點擊 確定 按鈕關閉它。

現在您會看到所有空白列都已從當前工作表/選定區域中刪除。請參見截圖：

3. 點擊 文件（或 Office 按鈕）> 列印 以僅列印當前工作表或選定區域中包含資料的列。

有時候，您可能希望僅列印包含資料的儲存格，並忽略 Excel 中的所有空白儲存格。此方法將介紹 Kutools for Excel 的 選擇非空儲存格 功能和 列印多選區向導 來僅列印指定區域內包含資料的儲存格。

1. 選擇您只想列印包含資料儲存格的區域，然後點擊 Kutools > 選擇 > 選擇非空儲存格。

2. 彈出一個 Kutools for Excel 對話框，顯示有多少包含資料的儲存格已被選中。點擊 確定 按鈕關閉它。

3. 保持選擇這些非空儲存格，然後點擊 企業 > 列印 > 列印多選區向導。請參見截圖：

4. 在彈出的 列印多選區向導 對話框中，您會看到所有選中的非空儲存格都列在 列印區域 清單中，請點擊 完成 按鈕。

5. 現在，所有選中的非空儲存格都被複製並粘貼為連結圖片到一個新的工作表中。請點擊 文件（或 Office 按鈕）> 列印 以列印這些包含資料的儲存格。

在 Excel 中每行列印在單獨頁面上

在 Excel 工作表中僅顯示列印區域

在 Excel 中列印區域、選擇內容及整個工作簿