Як запобігти видаленню певного вмісту комірки в Excel?
У цій статті йдеться про запобігання видаленню певного вмісту комірок у Excel. Ви можете досягти цього методами, описаними в цій статті.
Запобігайте видаленню вмісту певної комірки, захищаючи робочий аркуш
Запобігання видаленню вмісту певної комірки за допомогою коду VBA
Запобігайте видаленню вмісту певної комірки, захищаючи робочий аркуш
За замовчуванням усі комірки робочого аркуша заблоковані. Якщо ви хочете запобігти видаленню певного вмісту комірок та зробити інші комірки доступними для редагування після захисту, виконайте наступні дії.
1. Натисніть 
у верхньому лівому куті аркуша, щоб вибрати весь аркуш. Потім натисніть Ctrl + 1 ключі, щоб відкрити Формат ячеек діалогове вікно.
2. У спливаючому Формат ячеек діалоговому вікні, зніміть прапорець біля Заблокований опція під захист вкладку, а потім натисніть кнопку OK кнопку. Дивіться знімок екрана:
3. Виділіть клітинки, для яких не потрібно видаляти вміст, натисніть Ctrl + 1 клавіші, щоб відкрити Формат ячеек діалогове вікно ще раз, перевірте Заблокований опція під захист вкладку, а потім натисніть кнопку OK кнопки.
4. Тепер натисніть Розгляд > Захистити аркуш, а потім вкажіть і підтвердьте свій пароль в обох Захистити аркуш і Підтвердити пароль діалогові вікна.
Тепер аркуш захищений. І вказаний вміст комірки більше не буде видалено.
Запобігання видаленню вмісту певної комірки за допомогою коду VBA
Окрім вищезазначених двох методів, ви можете запустити код VBA, щоб запобігти видаленню певного вмісту комірки на аркуші. Будь ласка, виконайте наступне.
1. Відкрийте аркуш, що містить вміст комірки, який ви не хочете видаляти, клацніть правою кнопкою миші вкладку Аркуш, а потім клацніть Переглянути код з меню, що клацне правою кнопкою миші.
2. Скопіюйте та вставте наведений нижче код VBA у вікно коду Microsoft Visual Basic для додатків вікна.
Код VBA: запобігання видаленню вмісту певної комірки в Excel
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A1:E7")) Is Nothing Then Exit Sub
On Error GoTo ExitPoint
Application.EnableEvents = False
If Not IsDate(Target(1)) Then
Application.Undo
MsgBox " You can't delete cell contents from this range " _
, vbCritical, "Kutools for Excel"
End If
ExitPoint:
Application.EnableEvents = True
End Subпримітки: У коді A1: E17 - це діапазон, для якого вміст клітинки, який ви не зможете видалити. Ви можете змінити діапазон відповідно до своїх потреб.
Відтепер, при спробі видалити вміст комірки з діапазону A1: E17, ви отримаєте Kutools для Excel діалоговому вікні, як показано на знімку екрана, клацніть на OK кнопки.
Статті по темі:
- Як запобігти видаленню певного робочого аркуша в Excel?
- Як запобігти виділенню декількох аркушів у Excel?
Найкращі інструменти для підвищення продуктивності офісу
Kutools для Excel вирішує більшість ваших проблем і збільшує продуктивність на 80%
- Повторне використання: Швидко вставте складні формули, діаграми і все, що ви використовували раніше; Шифрувати комірки з паролем; Створити список розсилки та надсилати електронні листи ...
- Супер формула бар (легко редагувати кілька рядків тексту та формули); Макет читання (легко читати та редагувати велику кількість комірок); Вставте у відфільтрований діапазон...
- Об’єднати клітинки / рядки / стовпці без втрати даних; Вміст розділених комірок; Об'єднати повторювані рядки / стовпці... Запобігання дублюючим клітинам; Порівняйте діапазони...
- Виберіть Повторюваний або Унікальний Рядки; Виберіть Пусті рядки (усі клітинки порожні); Супер знахідка та нечітка знахідка у багатьох робочих зошитах; Випадковий вибір ...
- Точна копія Кілька клітинок без зміни посилання на формулу; Автоматичне створення посилань на кілька аркушів; Вставте кулі, Прапорці та інше ...
- Витяг тексту, Додати текст, Видалити за позицією, Видаліть пробіл; Створення та друк проміжних підсумків підкачки; Перетворення вмісту комірок та коментарів...
- Супер фільтр (зберегти та застосувати схеми фільтрів до інших аркушів); Розширене сортування за місяцем / тижнем / днем, частотою та іншим; Спеціальний фільтр жирним, курсивом ...
- Поєднайте робочі зошити та робочі аркуші; Об’єднати таблиці на основі ключових стовпців; Розділіть дані на кілька аркушів; Пакетне перетворення xls, xlsx та PDF...
- Понад 300 потужних функцій. Підтримує Office / Excel 2007-2021 і 365. Підтримує всі мови. Легке розгортання на вашому підприємстві чи в організації. 30-денна безкоштовна пробна версія повних функцій. 60-денна гарантія повернення грошей.
Вкладка Office забезпечує інтерфейс з вкладками для Office і значно спрощує вашу роботу
- Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
- Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
- Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
