KutoolsforOffice — Одно решение — пять мощных инструментов.Меньше усилий — больше результата.

Как быстро удалить всё содержимое разблокированных (незащищённых) ячеек в Excel?

АвторСяоянДата изменения

Если у вас есть лист с областью «Разблокировать выбор», и вы хотите мгновенно очистить всё содержимое разблокированных ячеек, какие решения этой задачи вам известны?

Удаление всего содержимого Разблокировать выбор с помощью функции Поиск и замена

Удаление всего содержимого Разблокировать выбор с помощью кода VBA

Удаление всего содержимого Разблокировать выбор с помощью Kutools для Excel

синяя стрелка вправо с пузырёмУдаление всего содержимого Разблокировать выбор с помощью функции Поиск и замена

Чтобы очистить все значения в незащищённых ячейках, воспользуйтесь функцией «Найти и заменить»: сначала выберите «Разблокировать выделение», а затем сразу удалите их.

1. Откройте лист, из которого нужно удалить «Разблокировать выбор», и нажмите Главная > Найти и выделить > Найти или воспользуйтесь сочетанием клавиш — Ctrl + F, чтобы открыть диалоговое окно Поиск и замена. См. скриншот:

перейти к функции «Найти и заменить»

2. В диалоговом окне Поиск и замена нажмите кнопку Параметры, чтобы развернуть диалоговое окно. См. скриншот:

развернуть диалоговое окно, нажав кнопку «Параметры»

3. Затем нажмите кнопку Формат, после чего откроется диалоговое окно Формат поиска. Перейдите на вкладку Защита и снимите флажки с полей Защищаемая и Скрытая, см. скриншот:

снимите флажки с полей «Защищено» и «Скрыто»

4. Нажмите ОК, чтобы вернуться в диалоговое окно Поиск и замена, затем нажмите кнопку Найти все. Все незащищённые ячейки появятся в списке ниже — нажмите Ctrl + A, чтобы выделить их все. См. скриншот:

нажмите «Найти все», чтобы найти незащищённые ячейки

5. Закройте диалоговое окно Поиск и замена. Все ячейки с параметром «Разблокировать выбор» будут выделены на текущем листе. См. скриншот:

все незащищённые ячейки выделены

6. Теперь достаточно нажать клавишу Delete на клавиатуре — и содержимое выбранных разблокированных ячеек будет удалено мгновенно.

синяя стрелка вправо с пузырём Удаление всего содержимого Разблокировать выбор с помощью кода VBA

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

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

2. Нажмите Вставка > Модуль и вставьте приведённый ниже код в окно Модуль.

Код VBA: Удаление всего содержимого Разблокировать выбор

Sub ClearUnlockedCells()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
For Each Rng In WorkRng
    If Rng.Locked = False Then Rng.ClearContents
Next
Application.ScreenUpdating = True
End Sub

3. Нажмите клавишу F5, чтобы запустить код, и во всплывающем окне укажите диапазон, из которого нужно удалить содержимое. Разблокируйте выделение — см. скриншот:

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

4. Нажмите ОК, и содержимое ячеек указанного разблокированного диапазона будет очищено.

синяя стрелка вправо с пузырём Удаление всего содержимого Разблокировать выбор с помощью Kutools для Excel

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

Kutools для Excel включает более 300 удобных инструментов для Excel. Бесплатная пробная версия без ограничений на 30 дней. Получить сейчас

После установки Kutools для Excel выполните следующие шаги:

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

2. Нажмите Kutools > Выделить > Выбрать незаблокированные ячейки.

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

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

4. Нажмите клавишу Delete на клавиатуре, чтобы немедленно удалить содержимое выделенных ячеек.

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

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

Как выделить все Разблокировать выбор в Excel?

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

🤖KUTOOLS AI Помощник: Преобразуйте Анализ данных с помощью:Интеллектуального выполнения   |  Генерации кода|  Создания пользовательские формулы  |  Анализа данных и построения диаграмм|  Вызова Расширенные функции…
Популярные функции:Поиск, выделение или Отметить дубликаты   |  Удалить пустые строки   |  Объединить столбцы или ячеек без потери данных   |  Округление без использования формул…
Супер ПОИСК:VLookup по нескольким критериям  |  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.

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