Как применить закрепление/открепление областей сразу к нескольким листам?

При работе с большими книгами Excel, содержащими десятки или даже сотни листов, вам может потребоваться часто оставлять определенные строки или столбцы видимыми путем закрепления областей. Однако стандартная функция «Закрепить области» в Excel работает только на активном листе, что делает процесс повторения этого действия на каждом листе вручную трудоемким. Если вам нужно последовательно закрепить (или позже открепить) одни и те же строки или столбцы на всех ваших листах, есть ли способ применить эту настройку ко всем листам одновременно — экономя ваше время и уменьшая вероятность пропуска какого-либо листа?

Применение закрепления областей ко всем листам одновременно с помощью кода VBA

Применение открепления областей ко всем листам одновременно с помощью кода VBA

Применение закрепления / открепления областей ко всем листам одним кликом с помощью Kutools для Excel

Применение закрепления областей ко всем листам одновременно с помощью кода VBA

Если вы хотите закреплять области в одном и том же месте ячейки на каждом листе вашей книги, VBA предоставляет эффективное решение для автоматизации этого процесса. Оно поможет поддерживать единообразный вид для всех листов, например, постоянно держать строки заголовков или ключевые столбцы видимыми в больших книгах. Обратите внимание, что этот метод требует от вас выбора ячейки, где вы хотите применить закрепление на каждом листе, так как VBA будет закреплять на основе активной ячейки внутри каждого из них.

1. Если вы хотите закрепить все листы в одинаковой позиции, выберите ячейку, которую вы хотите закрепить на листе, а затем, удерживая клавишу Shift, выберите все вкладки листов.

2. Нажмите ALT + F11, чтобы открыть окно Microsoft Visual Basic для приложений.

3. В окне редактора VBA нажмите Вставка > Модуль, затем скопируйте и вставьте следующий код VBA в окно модуля:

Код VBA: Закрепить все листы сразу в Excel

Sub Freeze()
'Updateby Extendoffice
Dim Ws As Worksheet
Application.ScreenUpdating = False
For Each Ws In Application.ActiveWorkbook.Worksheets
    Ws.Activate
    With Application.ActiveWindow
        .FreezePanes = True
    End With
Next
Application.ScreenUpdating = True
End Sub

4. Для выполнения нажмите F5 или кнопку Выполнить. Это применит закрепление областей в позиции активной ячейки для всех листов.

Примечание: Если вы не выбрали все листы, и активная ячейка отличается между листами, расположение закрепленных областей может различаться от листа к листу. Для обеспечения равномерности всегда выравнивайте активную ячейку перед запуском кода.

Применение открепления областей ко всем листам одновременно с помощью кода VBA

Когда несколько листов имеют закрепленные области, и вы хотите удалить эту настройку со всех листов одновременно, решение с использованием VBA может значительно упростить процесс. Вместо того чтобы вручную откреплять области лист за листом, следующий макрос быстро открепит все листы сразу.

1. Откройте книгу, содержащую закрепленные области на нескольких листах.

2. Нажмите ALT + F11, чтобы запустить редактор Microsoft Visual Basic для приложений.

3. Нажмите Вставка > Модуль, затем вставьте код ниже в окно модуля:

Код VBA: Открепить все листы сразу в Excel

Sub UnFreeze()
'Updateby Extendoffice
Dim Ws As Worksheet
Application.ScreenUpdating = False
For Each Ws In Application.ActiveWorkbook.Worksheets
    Ws.Activate
    With Application.ActiveWindow
        .FreezePanes = False
    End With
Next
Application.ScreenUpdating = True
End Sub

4. Нажмите F5 или кнопку Выполнить для выполнения. Все листы с закрепленными областями будут мгновенно освобождены от них.

Применение закрепления / открепления областей ко всем листам одним кликом с помощью Kutools для Excel

Если вы предпочитаете не использовать VBA или ищете более простой метод без кода, Kutools для Excel предоставляет эффективный способ применять закрепление или открепление областей на всех листах через удобное меню. Эта функция идеально подходит для пользователей, которые хотят получить быстрое и надежное решение с минимальным количеством шагов и без необходимости настройки макросов. Утилиты «Закрепить области на нескольких листах» и «Открепить области на нескольких листах» работают бесшовно, позволяя настроить или удалить положения закрепленных областей на каждом листе одним действием. Это значительно экономит время при работе с большими книгами и снижает вероятность несоответствий между листами.

После установки Kutools для Excel, пожалуйста, следуйте этим шагам:

1. Выберите ячейку, в которой вы хотите закрепить области на всех листах (например, выберите ячейку B2, если вы хотите сохранить видимость строки 1 и столбца A). Это положение будет применено одинаково для каждого листа. См. скриншот:

2. На ленте Excel нажмите Kutools Plus > Лист > Закрепить области на нескольких листах. См. скриншот:

3. Все листы мгновенно получат закрепленные области в одинаковом назначенном положении ячейки (например, B2), так что ваш вид будет согласован по всей книге.

Примечание: Чтобы удалить закрепленные области со всех листов за одну операцию, выберите Kutools Plus > Лист > Открепить области на нескольких листах. Это обеспечивает гибкость переключения вида по мере необходимости при работе с большими или сложными наборами данных. Функция особенно полезна при подготовке шаблонов, во время совещаний совета директоров или когда требуется быстрое и последовательное перемещение.

Демонстрация: Применение закрепления / открепления областей ко всем листам одним кликом с помощью Kutools для Excel