В электронной таблице для ячеек от A до G, которыми я заполняю данные, я хочу, чтобы ячейки были доступны для чтения-записи для пользователей (UserA, UserB), другие ячейки, т.е. ячейки H-J должны быть только для чтения.Для пользователя C и пользователя D ячейки H-J будут доступны для чтения-записи, а ячейки A-G - только для чтения.С сообщением об ошибке «Вам не разрешен доступ к этим ячейкам»
У меня будет лист «Список пользователей» в рабочей книге, который будет содержать всех пользователей и диапазон их ячеек для изменения.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A1:G10")) Is Nothing Then
Target.Offset(0, 1).Select
MsgBox "you not allowed to access this cells"
End If
End Sub