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

Question

Я хотел бы сделать ячейку «Имя ячейки» доступной только для чтения.

Я нашел этот код здесь, но не знаю, как использовать строковое значение вместо диапазона:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Not Intersect(Selection, Range("A1:A4")) Is Nothing Then
    Range("B1").Select
  End If
End Sub

Как я могу настроить этот код в соответствии со своими потребностями?

Answer 1

Вместо этого Range("A1:A4")вы просто поставите Range("Cell Name").

Кстати, код, который вы разместили, не делает ячейку доступной только для чтения; он просто затрудняет выбор любой ячейки в диапазоне, пока включен VBA. Ячейку по-прежнему можно редактировать с помощью VBA, или макросов Excel 4, или надстройки, или ряда других трюков.