要在 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 宏。
随后，您将看到非打印区域立即被隐藏，且仅打印区域在当前工作表中显示。请参见下方截图：
注意事项：
当当前工作表中仅有一个打印区域时，VBA 宏可正常运行。此方法不支持撤销操作。要显示非打印区域，您必须手动取消隐藏，或使用 Kutools for Excel 的隐藏 > 显示所有隐藏区域工具。