Я створюю електронну таблицю для даних тенденцій для аналітичного тестування хімічних продуктів. Я хотів би, щоб кожен рядок даних був заблокований, як тільки транскрипція цих даних буде перевірена рецензентом. Я можу заблокувати один рядок, використовуючи цей код у VBA:
Приватний допоміжний робочий лист_Change(ByVal Target As Range)
Якщо Range("X3") = "Ні", Тоді
Діапазон ("B3:W3"). Заблоковано = хибно
ElseIf Range("X3") = "Так" Тоді
Діапазон("B3:W3").Заблоковано = True
End If
End Sub
Стовпець X містить спадний список із двома варіантами «Так» і «Ні». Я хотів би, щоб кожен рядок даних, доданий до аркуша, блокувався після того, як рецензент вибрав «Так» у цьому стовпці, щоб переконатися, що в минулі дані не було внесено ненавмисних змін. Чи можливо це без повторення коду about для кожного рядка необмежено?
Приватний допоміжний робочий лист_Change(ByVal Target As Range)
Якщо Range("X3") = "Ні", Тоді
Діапазон ("B3:W3"). Заблоковано = хибно
ElseIf Range("X3") = "Так" Тоді
Діапазон("B3:W3").Заблоковано = True
End If
End Sub
Стовпець X містить спадний список із двома варіантами «Так» і «Ні». Я хотів би, щоб кожен рядок даних, доданий до аркуша, блокувався після того, як рецензент вибрав «Так» у цьому стовпці, щоб переконатися, що в минулі дані не було внесено ненавмисних змін. Чи можливо це без повторення коду about для кожного рядка необмежено?