Как заблокировать и защитить непустые ячейки в Excel?

Предположим, у меня есть рабочий лист, который содержит некоторые пустые ячейки в диапазоне данных. Теперь я хочу заблокировать и защитить все ячейки с данными, оставив пустые ячейки разблокированными для ввода новых значений. Как можно быстро заблокировать и защитить только непустые ячейки в Excel?

Блокировка и защита всех непустых ячеек в выбранном диапазоне с помощью Защиты Листа

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

Блокировка и защита всех непустых ячеек в выбранном диапазоне с помощью Защиты Листа

Обычно вы можете выполнить эту задачу в Excel, следуя пошаговому методу:

1. Выберите диапазон ячеек, которые вы хотите заблокировать и защитить, затем нажмите Главная > Найти и выделить > Перейти к специальным..., см. скриншот:

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

3. Затем нажмите кнопку ОК, и все пустые ячейки будут сразу выбраны. После этого нажмите Ctrl + 1, чтобы открыть окно Формат ячеек, на вкладке Защита снимите флажок Заблокировано, см. скриншот:

4. Нажмите ОК, затем нажмите Рецензирование > Защитить лист, затем введите и подтвердите пароль по необходимости, см. скриншот:

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

Раскройте магию Excel с Kutools AI

• Умное выполнение: Выполняйте операции с ячейками, анализируйте данные и создавайте диаграммы — всё это посредством простых команд.
• Пользовательские формулы: Создавайте индивидуальные формулы для оптимизации ваших рабочих процессов.
• Кодирование VBA: Пишите и внедряйте код VBA без особых усилий.
• Интерпретация формул: Легко разбирайтесь в сложных формулах.
• Перевод текста: Преодолейте языковые барьеры в ваших таблицах.

Улучшите возможности Excel с помощью инструментов на базе ИИ. Скачать сейчас и испытайте беспрецедентную эффективность!

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

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

1. Удерживайте клавиши ALT + F11, чтобы открыть окно Microsoft Visual Basic for Applications.

2. Затем нажмите Вставить > Модуль и вставьте следующий код в окно Модуля.

Код VBA: Блокировка и защита всех непустых ячеек на листе

Sub UnlockEmptyCells()
'Updateby Extendoffice
    Application.ScreenUpdating = False
    Cells.Locked = True
    Selection.SpecialCells(xlCellTypeBlanks).Locked = False
    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
    Application.ScreenUpdating = True
End Sub

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