如何在 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 的刪除空白行功能，可快速清除作用中工作表或所選區域內的所有空白列，讓您在 Excel 中僅列印包含資料的內容！請依照下列步驟操作：

1. 前往您要僅列印包含資料之列的工作表，然後點擊 Kutools > 刪除 > 刪除空白行 > 當前工作表。

注意：若要在限定區域中僅列印包含資料的列，請先選取該範圍，再依序點擊 Kutools > 刪除 > 刪除空白行 > 選擇區域。

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

現在，您會發現作用中工作表或所選區域內的所有空白列都已成功刪除。請參閱以下截圖：

3. 點擊檔案（或 ）Office 按鈕）> 列印，即可僅列印作用中工作表或所選區域中包含資料的列。

有時，您可能希望在 Excel 中僅列印包含資料的儲存格，忽略所有空白儲存格。此方法將介紹 Kutools for Excel 的選擇非空儲存格功能與列印多選區向導，協助您在 Excel 的指定區域中輕鬆列印所有含資料的儲存格！

1. 選取您要列印的資料範圍，然後點擊 Kutools> 選取> 選擇非空儲存格。

2. 將彈出一個 Kutools for Excel 對話方塊，顯示已選取多少個包含資料的儲存格。點擊確定按鈕即可關閉。

3. 保持選取這些非空白儲存格，然後點擊 Enterprise > 列印 > 列印多選區向導。請參閱截圖：

4. 在開啟的「列印多選區向導」對話方塊中，您會看到所有已選擇的非空儲存格皆已列於要列印的範圍清單中，請點擊完成按鈕。

5. 現在所有選取的非空儲存格都已複製，並以連結圖片的形式貼到新工作表中。請點擊檔案（或 ）Office 按鈕）> 列印，立即列印這些包含資料的儲存格！

在 Excel 中將每列／每個儲存格分別列印至獨立頁面

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

打印區域、選取範圍及整個活頁簿（Excel）