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

Question

Я хотел бы сделать ячейку "Cell Name" только для чтения.

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

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, или Надстройку, или ряд других приемов.