Перейти к основному содержанию

Как сделать ячейку доступной только для чтения в Excel?

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

Сделать ячейку доступной только для чтения, защитив рабочий лист
Сделать ячейку доступной только для чтения кодом VBA без защиты рабочего листа


Сделать ячейку доступной только для чтения, защитив рабочий лист

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

1. Нажмите кнопку в верхнем левом углу текущего листа, чтобы выбрать целые ячейки.

2. нажмите Ctrl + 1 клавиши одновременно, чтобы открыть Формат ячеек диалоговое окно. В диалоговом окне снимите флажок Заблокированный поле под Protection и нажмите OK кнопка. Смотрите скриншот:

3. Теперь выберите ячейки, которые нужно сделать доступными только для чтения (здесь я выбираю ячейки диапазона A1: C18). нажмите Ctrl + 1 клавиши одновременно, чтобы открыть Формат ячеек диалоговое окно, проверьте Заблокированный поле под Protection вкладку и нажмите OK .

4. Продолжайте нажимать Обзор > Защитить лист. Смотрите скриншот:

5. Укажите и подтвердите свой пароль для защиты рабочего листа, как показано на скриншоте ниже.

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


Одновременная защита нескольких / всех листов паролем в текущей книге:

Microsoft Excel позволяет защищать паролем по одному листу за раз. Здесь вы можете использовать Защитить лист и Снять защиту листа коммунальные услуги Kutools for Excel для быстрой защиты или снятия защиты с нескольких листов или всех рабочих листов в текущей книге с помощью пароля одновременно.
Скачайте и попробуйте прямо сейчас! (30-дневный бесплатный пробный период)


Сделать ячейку доступной только для чтения кодом VBA без защиты рабочего листа

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

1. Щелкните правой кнопкой мыши вкладку листа, в которой необходимо сделать ячейку доступной только для чтения, а затем щелкните Просмотреть код из контекстного меню.

2. В дебюте Microsoft Visual Basic для приложений окна, скопируйте и вставьте приведенный ниже код VBA в окно кода.

Код VBA: сделать ячейку доступной только для чтения в Excel

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column = 1 Then
        If Target.Row = 3 Or Target.Row = 4 Or Target.Row = 5 Then
            Beep
            Cells(Target.Row, Target.Column).Offset(0, 1).Select
            MsgBox Cells(Target.Row, Target.Column).Address & " cannot be selected and edited as it is a read-only cell", _
            vbInformation, "Kutools for Excel"
        End If
    End If
End Sub

Внимание: Этот код может просто сделать указанные ячейки в одном столбце доступными только для чтения. В этом коде ячейки A3, A4 и A5 будут доступны только для чтения на текущем листе.

3. нажмите другой + Q ключи, чтобы закрыть Microsoft Visual Basic для приложений окно.

При нажатии на ячейку A3, A4 или A5 на текущем листе вы получите Kutools for Excel диалоговое окно, как показано на скриншоте ниже, и курсор автоматически переместится в правую соседнюю ячейку.

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

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

Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени.  Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...

вкладка kte 201905


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

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
Comments (12)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Very useful!!
This comment was minimized by the moderator on the site
Hi! How about if i want to just make 1 column editable and the rest uneditable? Thanks!
This comment was minimized by the moderator on the site
Hi Jac,
Please click on the column header to select the whole column, then do the steps mentioned in the post to unlock the column cells then protect the worksheet.
This comment was minimized by the moderator on the site
every usefull, thank you with gratitude
This comment was minimized by the moderator on the site
Thanks for the quick guidance.
This comment was minimized by the moderator on the site
Hi



I have mulipe sheets Menu ( option A1& A2) , A1 and A2 and VIEW work sheets ( where i will have BROWSE button) .



1. In menu i will select A1..

2. it will go to VIEW sheet ( which is working fine) till now ..

3. when i click on the BROWSE in the VIEW sheet A1 shee shoulf get displayed and the content present in the cells should be non editable..



Could you please help..
This comment was minimized by the moderator on the site
Good day,
Supposing there is a Command Button (ActiveX Control) in the View sheet. After inserting the below VBA into the worksheet code window, click on the button, in a popping up Kutools for Excel dialog box, specify a password to protect the sheet A1. Then sheet A1 is opened and non editable.

Private Sub CommandButton1_Click()
Dim xSheet As Worksheet
Dim xStr As String
On Error Resume Next
Set xSheet = Sheets("A1")
If xSheet Is Nothing Then Exit Sub
xSheet.UsedRange.Locked = True
xStr = Application.InputBox("Please specify a password to protect the sheet A1", "KuTools for Excel", , , , , , 2)
If xStr = False Or xStr = "" Then Exit Sub
xSheet.Protect xStr
xSheet.Activate
End Sub
This comment was minimized by the moderator on the site
i just want to make few cells of a book locked for input, only they shows the result as i programmed them to do so
This comment was minimized by the moderator on the site
Hey, Thanks a lot for this steps.


However, what if I want to copy the values in the cells that I have locked?
This comment was minimized by the moderator on the site
Dear Yahia,
The locked cells in a protected worksheet can't be copied.
This comment was minimized by the moderator on the site
Very Helpful. Thanks ! :D
This comment was minimized by the moderator on the site
Dear i want to protect the hidden cells from by copying to the new sheet, is there any option in the excel sheet for that. Means no can able to view the formulaes after copying from one sheet to other sheet.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations