Совет. Другие языки - Google-Translated. Вы можете посетить English версия этой ссылки.
Войти
x
or
x
x
Регистрация
x

or

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

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

Применяйте Freeze Panes к всем листам сразу с кодом VBA

Применить Unfreeze Panes на все листы сразу с кодом VBA

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


Применить замораживание / размораживание панелей к нескольким листам:

Kutools for Excel 's Замораживание / Освобождение панелей нескольких листов может помочь вам заморозить или разморозить все рабочие листы в вашей книге одним щелчком мыши.

doc заморозить несколько листов 1

Kutools for Excel: с более чем 200 удобными надстройками Excel, бесплатно попробовать без ограничений в 60-дни. Скачать и бесплатно пробную версию!



Вы можете использовать следующий код, чтобы применить панели «Замораживание» ко всем листам, выполните следующие действия:

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

2, Удерживайте ALT + F11 и открывает Окно Microsoft Visual Basic для приложений.

3. Щелчок Вставить > модуль, и вставьте следующий код в Окно модуля.

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

Sub Freeze()
'Update 20140317
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 для запуска этого кода, и все листы были применены с помощью замораживания в той же позиции.

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


Если в вашем Excel есть несколько листов, которые могут быть заблокированы, как бы вы могли разморозить их за раз, кроме размораживания их по одному?

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

2, Удерживайте ALT + F11 и открывает Окно Microsoft Visual Basic для приложений.

3. Щелчок Вставить > модуль, и вставьте следующий код в Окно модуля.

Код VBA: Unfreeze все листы сразу в Excel

Sub UnFreeze()
'Update 20140317
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 ключ для запуска этого кода, и все листы, которые применяются со стеклами замораживания, были разморожены сразу.


Если вы не знакомы с кодами VBA, вот мощный инструмент, Kutools for Excel, Его Стоп-листы нескольких листов Unfreeze panes несколько листов утилиты могут помочь вам мгновенно заморозить или разморозить все листы текущей книги.

Kutools for Excel : с более чем 300 удобными надстройками Excel, бесплатно попробовать без ограничений в 60-дни.

Если вы установили kutools для Excel, сделайте следующее:

1, Выберите ячейку, в которой вы хотите применить панель замораживания для всех листов, в этом случае я нажимаю на ячейку B2, см. Снимок экрана:

doc заморозить все листы 1-1

2, Затем нажмите Предприятие > Рабочий лист > Стоп-листы нескольких листов, см. снимок экрана:

doc заморозить все листы 2-2

3, И тогда все ваши рабочие листы применяли замораживающие панели в том же положении ячейки B2.

Внимание: Если вы хотите немедленно разморозить их, вам просто нужно применить функцию многократных рабочих листов Unfreeze, щелкнув Предприятие > Рабочий лист > Unfreeze panes несколько листов.

Скачать и бесплатно пробную версию Kutools для Excel сейчас!


Kutools for Excel: с более чем 200 удобными надстройками Excel, бесплатно попробовать без ограничений в 60-дни. Скачать и бесплатно пробную версию!


Связанная статья:

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


Kutools для Excel решает большинство ваших проблем и повышает производительность на 80%

  • Снова использовать: Быстро вставить сложные формулы, графики и все, что вы использовали раньше; Шифрование ячеек с паролем; Создать список рассылки и отправлять электронные письма ...
  • Супер Формула Бар (легко редактировать несколько строк текста и формул); Макет чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон...
  • Объединить ячейки / строки / столбцы без потери данных; Содержание сплит-клеток; Объединить дублирующиеся строки / столбцы... предотвратить повторяющиеся клетки; Сравнить диапазоны...
  • Выберите Дубликат или Уникальный Ряды; Выберите пустые строки (все ячейки пусты); Супер найти и нечеткая находка во многих рабочих тетрадях; Случайный выбор ...
  • Точная копия Несколько ячеек без изменения формулы ссылки; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое ...
  • Извлечение текстаДобавить текст, Удалить по позиции, Удалить пространство; Создание и печать промежуточных итогов подкачки; Преобразование содержимого ячеек и комментариев...
  • Суперфильтр (сохранить и применить схемы фильтров к другим листам); Расширенный поиск по месяцам / неделям / дням, частоте и более; Специальный фильтр жирным шрифтом, курсивом ...
  • Объединить рабочие тетради и рабочие листы; Объединение таблиц на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF...
  • Более чем мощные функции 300, Поддерживает Office / Excel 2007-2019 и 365. Поддерживает все языки. Простота развертывания на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия.
вкладка kte 201905

Вкладка «Office» предоставляет интерфейс с вкладками для Office и упрощает работу

  • Включить редактирование и чтение с вкладками в Word, Excel, PowerPoint, Издатель, Доступ, Visio и Проект.
  • Открывайте и создавайте несколько документов в новых вкладках одного и того же окна, а не в новых окнах.
  • Увеличивает вашу производительность на 50% и уменьшает сотни щелчков мышью для вас каждый день!
нижняя часть офиса
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    JD · 3 years ago
    want to be able to freeze top row on multiple worksheets
  • To post as a guest, your comment is unpublished.
    Kurt · 4 years ago
    I tried this in my workbook and it worked very well.

    thanks
  • To post as a guest, your comment is unpublished.
    Orchid · 5 years ago
    dear all,
    I have a test in my workbook, have a good note that before you apply this macro, please move the mouse to the cell that you need to apply freeze pane in the sheet.
    it's really helpful. this info is what I am looking for.
    thank you very much
    Lan