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

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

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

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

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

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

2. Одновременно нажмите клавиши Ctrl + 1, чтобы открыть диалоговое окно «Формат ячеек». В открывшемся окне снимите флажок «Заблокировано» на вкладке «Защита», а затем нажмите кнопку «ОК». См. скриншот:

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

4. Далее перейдите к разделу «Рецензирование» > «Защитить лист». См. скриншот:

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

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

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

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

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

2. В открывшемся окне Microsoft Visual Basic for Applications скопируйте и вставьте приведенный ниже код 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. Нажмите клавиши Alt + Q, чтобы закрыть окно Microsoft Visual Basic for Applications.

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