Note: The other languages of the website are Google-translated. Back to English

Как разрешить редактирование объектов на защищенном листе в Excel?

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

Разрешить редактировать объекты на защищенном листе, установив флажок Редактировать объекты
Разрешить редактировать объекты на защищенном листе с кодом VBA


Разрешить редактировать объекты на защищенном листе, установив флажок Редактировать объекты

Пожалуйста, отметьте опцию Редактировать объекты, чтобы разрешить редактирование объектов перед защитой рабочего листа. Пожалуйста, сделайте следующее.

1. Нажмите Обзор > Защитить лист.

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

Теперь рабочий лист защищен, и все объекты на этом защищенном листе доступны для редактирования.


Разрешить редактировать объекты на защищенном листе с кодом VBA

Если рабочий лист уже был защищен, вы можете попробовать следующий сценарий VBA, позволяющий редактировать объекты. Пожалуйста, сделайте следующее.

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

2. в Microsoft Visual Basic для приложений окно, дважды щелкните Эта рабочая тетрадь слева Проекты под застройку панель. Затем скопируйте и вставьте приведенный ниже код VBA в ThisWorkbook (Код) окно.

Код VBA: разрешить редактировать объекты на защищенном листе

Private Sub Workbook_Open()
    Application.ScreenUpdating = False
    On Error Resume Next
    With Worksheets("Sheet3")
        .EnableOutlining = True
        .EnableAutoFilter = True
        .Protect Password:="123", _
        Contents:=True, DrawingObjects:=False, UserInterfaceOnly:=True, _
        AllowFormattingCells:=True
    End With
    Application.ScreenUpdating = True
End Sub

Внимание: В коде Sheet3 - это защищенный рабочий лист, содержащий объекты, которые необходимо отредактировать. А цифра «123» - пароль защищенного листа. Пожалуйста, измените их по своему усмотрению.

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


Статьи по теме:


Лучшие инструменты для работы в офисе

Kutools for Excel решает большинство ваших проблем и увеличивает вашу производительность на 80%

  • Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма ...
  • Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон...
  • Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы... Предотвращение дублирования ячеек; Сравнить диапазоны...
  • Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор ...
  • Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое ...
  • Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии...
  • Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом ...
  • Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF...
  • Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.
вкладка kte 201905

Вкладка Office: интерфейс с вкладками в Office и упрощение работы

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
офисный дно
Сортировать комментарии по
Комментарии (1)
Оценок пока нет. Оцените первым!
Этот комментарий был сведен к минимуму модератором на сайте
Здравствуйте,
спасибо за полезную статью. Я попробовал метод кода VBA, но он у меня не совсем работает.


Мой код (извините за форматирование, не смог скопировать и вставить):


Sub Workbook_Open ()

Dim ws В качестве рабочего листа

Для каждого ws в рабочих листах

ws.Protect UserInterfaceOnly: = True, пароль: = "123"

ws.Включить автофильтр = Истина

ws.EnableOutlining = Истина

Если ActiveSheet.Protection.AllowFormattingColumns = False Тогда

ActiveSheet.Protect AllowFormattingColumns:=True

End If

С рабочими листами («Лист1»)

.EnableOutlining = Истина

.EnableAutoFilter = Истина

.Защитить пароль:="123", _

Contents:=True, DrawingObjects:=False, UserInterfaceOnly:=True

Конец с

Следующий ws

End Sub


Он работает нормально, но как только я сохраняю, закрываю и снова открываю файл, я либо

- попросили ввести пароль (примерно 5 раз) немедленно или

- возможность снять защиту без пароля для одного из рабочих листов (обычно "Лист1", как в Кодексе)


Кто-то получает ту же ошибку, что и я? Или кто-нибудь может мне помочь?


Спасибо заранее.


BR

Ванесса
Здесь еще нет комментариев
Оставляйте свои комментарии
Публикация как гость
×
Оценить этот пост:
0   Характеристики
Предлагаемые места

Подписывайтесь на Нас

Copyright © 2009 - www.extendoffice.ком. | Все права защищены. Питаться от ExtendOffice, | Карта сайта
Microsoft и логотип Office являются товарными знаками или зарегистрированными товарными знаками Microsoft Corporation в США и / или других странах.
Защищено Sectigo SSL