Прескочи на основното съдържание

Как да предотвратите изтриването на определен работен лист в Excel?

Автор: Силувия Последна промяна: 2020-09-11

Ако искате да предотвратите изтриването на определен работен лист в Excel, моля, опитайте метода в тази статия.

Предотвратете изтриването на определен работен лист с VBA код


Предотвратете изтриването на определен работен лист с VBA код

Кодът VBA по-долу може да ви помогне да предотвратите изтриването на определен работен лист в Excel. Моля, направете следното.

1. Отворете работния лист, който не искате да бъде изтрит, щракнете с десния бутон върху раздела на листа и щракнете Преглед на кода от менюто с десен бутон.

2. В Microsoft Visual Basic за приложения прозорец, моля, копирайте и поставете кода на VBA по-долу в прозореца на кода.

VBA код: Предотвратете изтриването на определен работен лист в Excel

Private Sub Worksheet_Activate()
ThisWorkbook.Protect "yourpassword"
End Sub

Private Sub Worksheet_Deactivate()
ThisWorkbook.Unprotect "yourpassword"
End Sub

Забележка: В кода, моля, заменете съдържанието „вашата парола“ с вашата истинска парола.

3. Натисни Друг + Q клавиши едновременно, за да затворите Microsoft Visual Basic за приложения прозорец.

4. Преминете към друг работен лист и се върнете отново към този работен лист, за да активирате VBA кода.

5. Щракнете с десния бутон върху раздела на листа, можете да видите Изтрий опцията е сива и деактивирана сред опциите, както е показано на екранната снимка по-долу.


Свързани статии:

Най-добрите инструменти за продуктивност в офиса

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

Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време.  Щракнете тук, за да получите функцията, от която се нуждаете най-много...

Описание


Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна

  • Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
  • Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
Comments (6)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
C'est très bien, mais ma macro ne marche pas depuis que j'ai ajouter cette protection. Pourtant j'ai bien une formule pour deverrouiller mes pages lors du lancement de la macro. Comment faire?
This comment was minimized by the moderator on the site
Здравствуйте. Вы пишите " 3. нажмите другой + Q клавиши одновременно, чтобы закрыть Microsoft Visual Basic для приложений окно. "

а что такое " другой +Q" ?
This comment was minimized by the moderator on the site
Hi Владимир,
Alt + Q is the default keyboard shortcuts to close the Visual Basic Editor window and returns to application.
This comment was minimized by the moderator on the site
hmm.. but after you do that everyone can still click on "view code" and see the password. what is the password for? how can you delete the sheet using the password?
This comment was minimized by the moderator on the site
Mate.., it is more for ACCIDENTAL DELETION.
This comment was minimized by the moderator on the site
This does not prevent worksheet deletion. Add an extra sheet, select the new sheet as the primary, the "protected" sheet as a secondary selection and delete. Bye-bye "protected" sheet.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations