DisplayAlerts

3.7K

16 апреля 2004 года

dedtolya

41 / / 12.10.2003

Может так:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Target.AllowEdit = False Then
MsgBox "Ай, Ай, Ай! Сюда нельзя!"
End If
End Sub
Успехов