Как отобразить только область печати на листе в Excel?

Когда мы отображаем лист в режиме разрыва страницы, нажав на Вид > Разрыв страницы – Предварительный просмотр, фон непечатаемой области автоматически становится темно-серым. Смотрите скриншот ниже:

Примечание: Также можно перейти в режим предварительного просмотра разрыва страницы, нажав на Разрыв страницы – Предварительный просмотр кнопку на строке состояния.

Однако этот способ не скрывает непечатаемую область — данные в ней по-прежнему видны.

Одним кликом скрыть всё, кроме выбранного диапазона (скрыть неиспользуемые столбцы/строки/ячейки)

Чаще всего мы используем только часть листа, оставляя пустые числовые ячейки или диапазоны. Функция Kutools для 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 для Excel Скрыть > Показать все диапазоны.

Если у вас установлен Kutools для Excel, его функция Скрыть не выбранную область поможет легко отобразить только область печати на текущем листе.

Шаг1: Выделите область печати на текущем листе.

Примечание: Если вы не можете быстро найти область печати, нажмите F5 для открытия окна Перейти, выберите имя области печати и нажмите OK кнопку, как показано на скриншоте ниже. Однако этот способ выделяет все области печати на текущем листе.

Шаг2: Нажмите Kutools > Показать / Скрыть > Скрыть не выбранную область.

Теперь на текущем листе сразу будет отображаться только выбранная область печати, как показано на скриншоте ниже:

Примечания:

1. Функция Скрыть не выбранную область в Kutools для Excel поддерживает отмену — вы можете одновременно нажать Ctrl + Z , чтобы снова отобразить скрытую непечатаемую область.
2. Вы можете нажать Kutools > Показать / Скрыть > Показать все диапазоны, чтобы немедленно отобразить скрытую непечатаемую область.

Установить положение прокрутки или скрыть другие ячейки

Показать скрытые диапазоны (столбцы и строки)

Скрыть другие листы