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

Как запретить другим пользователям вставлять листы в Excel?

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

Предположим, у вас есть книга, которую вы отправите другим пользователям для просмотра или проверки её содержимого, однако вы не хотите, чтобы кто-либо добавлял в эту книгу какие-либо Новый лист, чтобы избежать её загромождения. В этой статье я расскажу о том, как запретить другим пользователям вставлять листы в книгу.

Запрет вставки листов с помощью функции «Защита книги»

Запрет вставки листов с помощью кода VBA

стрелка синяя вправо с пузырёмЗапрет вставки листов с помощью функции «Защита книги»

В Excel есть функция Защита книги, которая защищает структуру книги от вставки, удаления, переименования листов и других операций. Выполните следующие действия:

1. Перейдите на вкладку Рецензирование → Защита книги, см. снимок экрана:

снимок экрана перехода к функции «Защитить книгу»

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

снимок экрана ввода паролястрелкаснимок экрана повторного ввода пароля

3. Затем нажмите кнопку OK, чтобы закрыть диалоговые окна. Теперь, при попытке вставить новый лист в эту книгу, функция вставки листа будет недоступна.

Примечание. При использовании этой функции в книге следующие пункты меню становятся недоступными (отображаются серым цветом).

результат после защиты книги

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

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

1. Откройте книгу, в которой нужно отключить возможность вставки листов.

2. Затем нажмите сочетание клавиш ALT + F11, чтобы открыть окно Microsoft Visual Basic для приложений.

3. В левой области VBAProject дважды щёлкните элемент ЭтаКнига, чтобы открыть модуль, затем скопируйте и вставьте приведённый ниже код.

Код VBA: запрет вставки листов 

Private Sub Workbook_NewSheet(ByVal Sh As Object)
'Update 20140623
With Application
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Sh.Delete
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End With
 MsgBox "disable to add sheets"
End Sub

снимок экрана окна кода VBA

4. Затем сохраните и закройте этот код, вернитесь к книге — и теперь при попытке вставить новый лист в эту книгу появится предупреждающее сообщение о том, что вставка листов невозможна. См. снимок экрана:

результат после выполнения кода

См. также:

Как запретить пользователям печать листа?

Как отключить клавишу справки F1 в 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-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
  • Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек