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

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

Автор: Xiaoyang Последна промяна: 2020-07-03

В Excel можете да промените името на листа, като щракнете двукратно върху името на раздела бързо и лесно, но понякога не бихте позволили на други да променят името на листа. В този случай, как можете да предотвратите промяната на името на листа в работна книга?

Предотвратете промяната на името на листа чрез защита на работната книга

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


стрелка син десен балон Предотвратете промяната на името на листа чрез защита на работната книга

Ако приложите Защитете работна книга функция, всички имена на листове няма да бъдат променени, моля, направете следното:

1. Щракнете Оценки на посетители > Защитете работна книга, вижте екранна снимка:

doc предотвратяване на промяна на името на лист 1

2. В Защитете структурата и Windows диалогов прозорец, въведете паролата, проверете структура под Защитете работната книга заи след това потвърдете паролата отново, вижте екранната снимка:

doc предотвратяване на промяна на името на лист 2

3, След това кликнете OK сега, когато щракнете два пъти, за да промените името на листа, ще изскочи предупредително съобщение, за да ви напомни, че името на листа не може да бъде променено, вижте екранната снимка:

doc предотвратяване на промяна на името на лист 3

Забележка: С тази функция, с изключение на промяната на името на листа, други функции като вмъкване на лист, изтриване на лист, скриване на лист... също са деактивирани.

doc предотвратяване на промяна на името на лист 4


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

Ето код на VBA, който също може да ви помогне да предотвратите промяната на конкретно име на лист. Моля, направете следното:

1. Щракнете с десния бутон върху раздела на листа, чието име искате да защитите да не се променя, и след това изберете Преглед на кода от контекстното меню, в изскачащия Microsoft Visual Basic за приложения прозорец, моля, копирайте и поставете следния код в празното поле Модули:

VBA код: Предотвратяване на промяна на името на листа:

Private Sub worksheet_SelectionChange(ByVal Target As Excel.Range)
'Updateby Extendoffice
If ActiveSheet.Name <> "Master" Then
ActiveSheet.Name = "Master"
End If
End Sub

doc предотвратяване на промяна на името на лист 5

Забележка: В горния код, Майсторr е името на листа, което искате да защитите от промяна.

2. След това запазете и затворете кода, от сега нататък, когато преименувате това конкретно име на лист, то ще бъде възстановено до оригиналното наведнъж. Вижте екранна снимка:

doc предотвратяване на промяна на името на лист 6

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

🤖 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 (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi i had one query
I had given sum if formula where as the sheet name is "Charge" and where i had given formula in that particular sheet i want to replace formula in AH row so when i am replacing formula from ROW -AR to AH the sheet name reflecting in formula is also changing how should i replace
This comment was minimized by the moderator on the site
Hello, there!

Use of vba code to prevent renaming sheets is fantastic. However, it shows the message: "That name is already taken. Try a different one." if hyperlink to a next sheet in the same workbook is clicked.

Could you help, please?
This comment was minimized by the moderator on the site
Hello Acharya ,
The warning message you remind is the default message when there is same name in the workbook, it can't be avoided.
Thank you!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations