Перейти к содержимому

Kutools для Office — один пакет. Пять инструментов. Выполняйте больше.

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

Author Xiaoyang Last modified

При работе с большими книгами 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 . После установки вы сможете легко получить доступ к этой функции, как описано ниже.

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

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

A screenshot showing how to select a cell in Excel for applying freeze panes across all worksheets

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

A screenshot showing the Freeze Panes option in Kutools for Excel to freeze multiple worksheets at once

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

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


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

 
Kutools для Excel: Более 300 удобных инструментов у вас под рукой! Наслаждайтесь постоянно бесплатными функциями ИИ! Скачать сейчас!

Лучшие инструменты для повышения продуктивности в Office

🤖 Kutools AI Aide: Совершенно новый подход к анализу данных благодаря: Интеллектуальное выполнение |  Генерация кода  |  Создание пользовательских формул |  Анализ данных и построение диаграмм  |  Вызов Kutools Functions
Популярные функции: Поиск, выделение или отметка дубликатов | Удалить пустые строки | Объединить столбцы или адреса без потери данных | Округлить ...
Супер ПОИСК: VLOOKUP по нескольким критериям | VLOOKUP по нескольким значениям | Многолистовой поиск | Распознавание нечетких соответствий ...
Расширенный раскрывающийся список: Быстро создать раскрывающийся список | Зависимый раскрывающийся список | Множественный выбор в раскрывающемся списке ...
Менеджер столбцов: Добавить определённое количество столбцов | Переместить столбцы | Переключить видимость скрытых столбцов | Сравнить диапазоны и столбцы ...
Рекомендуемые функции: Сетка фокусировки | Дизайн листа | Улучшенная строка формулы | Управление книгой и листами | Библиотека автотекста | Выбор даты | Объединить данные | Зашифровать/расшифровать ячейки | Отправить письмо по списку | Супер фильтр | Специальный фильтр (фильтр жирный/курсив/зачеркнутый...) ...
Топ15 наборов инструментов:12 текстовых инструментов (Добавить текст, Удалить определенные символы, ...) |50+ типов диаграмм (Диаграмма Ганта, ...) |40+ полезных формул (Расчет возраста на основе даты рождения, ...) |19 инструментов для вставки (Вставить QR-код, Вставить изображение по пути, ...) |12 инструментов преобразования (Преобразовать в слова, Конвертация валюты, ...) |7 инструментов объединения и разделения (Расширенное объединение строк, Разделить ячейки, ...) | ... и многое другое
Используйте Kutools на предпочитаемом вами языке — поддерживает Английский, Испанский, Немецкий, Французский, Китайский и более40 других языков!

Повысьте свои навыки работы в Excel с помощью Kutools для Excel и ощутите эффективность на новом уровне. Kutools для Excel предлагает более300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы выбрать функцию, которая вам нужнее всего...


Office Tab добавляет вкладки в Office и делает вашу работу намного проще

  • Включите режим вкладок для редактирования и чтения в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Открывайте и создавайте несколько документов во вкладках одного окна вместо новых отдельных окон.
  • Увеличьте свою продуктивность на50% и уменьшите количество щелчков мышью на сотни ежедневно!

Все надстройки Kutools. Один установщик

Пакет Kutools for Office включает надстройки для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro — идеально для команд, работающих в разных приложениях Office.

Excel Word Outlook Tabs PowerPoint
  • Комплексный набор — надстройки для Excel, Word, Outlook и PowerPoint плюс Office Tab Pro
  • Один установщик, одна лицензия — настройка занимает считанные минуты (MSI-совместимо)
  • Совместная работа — максимальная эффективность между приложениями Office
  • 30-дневная полнофункциональная пробная версия — без регистрации и кредитной карты
  • Лучшее соотношение цены и качества — экономия по сравнению с покупкой отдельных надстроек