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

當您在工作表中點擊檢視 > 分頁預覽，切換至分頁符檢視時，非列印區域的背景會自動變為深灰色。請參閱下方螢幕截圖：

注意：您也可以點擊狀態欄中的分頁預覽按鈕，快速切換至分頁預覽檢視。

然而，此方法不會隱藏非列印區域，您仍可在非列印區域中檢視資料。

一鍵隱藏除選擇區域外的所有內容（隱藏未使用的欄/列/儲存格）

多數情況下，我們往往只使用部分工作表，其餘區域則留有大量空白儲存格或未使用的範圍。Kutools for Excel 的隱藏非選中區域工具可讓您一鍵隱藏選取區域以外的所有內容，或輕鬆隱藏所有未使用的儲存格、列、欄與範圍！

若想在 Excel 中徹底隱藏非列印區域，可透過 VBA 巨集來實現。操作步驟如下：

步驟 1：同時按下 Alt+F11 鍵，立即開啟 Microsoft Visual Basic for Applications 視窗！

步驟 2：點擊插入> 模組，然後將下列 VBA 程式碼貼到模組視窗中：

VBA：僅在當前工作表中顯示打印區域

Public Sub HideAllButPrintArea()
Dim xPrintRng As Range
Dim xFirstRng As Range
Dim xLastRng As Range
Application.ScreenUpdating = False
With Application.ActiveSheet
.Cells.EntireColumn.Hidden = False
.Cells.EntireRow.Hidden = False
If .PageSetup.PrintArea <> "" Then
Set xPrintRng = .Range(.PageSetup.PrintArea)
Else
Set xPrintRng = .UsedRange
End If
Set xFirstRng = xPrintRng.Cells(1)
Set xLastRng = xPrintRng.Cells(xPrintRng.Count)
If xFirstRng.Row > 1 Then
.Range(.Cells(1, 1), xFirstRng(-0, 1)).EntireRow.Hidden = True
End If
If xFirstRng.Column > 1 Then
.Range(.Cells(1, 1), xFirstRng(1, 0)).EntireColumn.Hidden = True
End If
If xLastRng.Row < .Rows.Count Then
.Range(xLastRng(2, 1), .Cells(.Rows.Count, 1)).EntireRow.Hidden = True
End If
If xLastRng.Column < .Columns.Count Then
.Range(xLastRng(1, 2), .Cells(1, .Columns.Count)).EntireColumn.Hidden = True
End If
End With
Application.ScreenUpdating = True
End Sub

步驟 3：按下 F5 鍵或點擊執行按鈕，立即執行此 VBA 巨集！

接著，您會立即看到非打印區域被隱藏，僅顯示當前工作表中的打印區域。請參閱下方螢幕截圖：

注意事項：

1. 當目前工作表中僅設有一個列印區域時，VBA 巨集即可正常運作。
2. 此方法不支援復原功能。若要顯示非列印區域，您必須手動取消隱藏非列印區域，或使用 Kutools for Excel 的隱藏 > 顯示所有隱藏區域工具，立即輕鬆還原！

若您已安裝 Kutools for Excel，其隱藏非選中區域工具可協助您輕鬆僅在當前工作表中顯示列印區域。

步驟 1：在當前工作表中選取您要列印的區域。

注意：若您難以快速找到打印區域，可按下 F5 鍵開啟「定位」對話方塊，選取打印區域名稱後，再點擊確定按鈕（如下方螢幕截圖所示）。但此方法將選取目前工作表中的所有打印區域。

步驟 2：點擊 Kutools > 顯示 / 隱藏 > 隱藏非選中區域。

接著您會立即看到僅選取的打印區域顯示於當前工作表中（如下方螢幕截圖所示）：

注意事項：

1. Kutools for Excel 的隱藏非選中區域功能支援復原操作，只需同時按下 Ctrl+Z 鍵，即可立即顯示先前隱藏的非打印區域！
2. 您可以點擊 Kutools > 顯示 / 隱藏 > 隱藏顯示所有隱藏區域，立即顯示隱藏的非打印區域。

設定捲動位置或隱藏其他儲存格

顯示隱藏的範圍（欄與列）

隱藏其他工作表