ячейка блокировки динамического листа на основе диапазона значений

Question

Я хочу использовать лист Excel для динамических целей.

Различные номера продуктов, полученные из сканирующих штрих-кодов, необходимо вводить в столбце A. Я хочу убедиться, что если номер продукта, введенный (отсканированный), начинается с "200", ячейка автоматически блокируется после ввода номера продукта. Если введен любой другой номер продукта, ячейка не блокируется.

Я также хочу изменить цвет на красный для серии кодов продуктов, начиная с "200".

Например:

Column A
200412311     - Cell " A1" gets locked
200142390     - Cell " A2" gets locked
200412345     - Cell " A3" gets locked
200154672     - Cell " A4" gets locked
200234578     - Cell " A5" gets locked
100452433     - Cell is not locked
100452412     - Cell is not locked

Answer 1

Я верю, что после этих шагов вы получите то, что вы хотите.

1. Выберите столбец A. Щелкните правой кнопкой мыши и выберите Format Cells... На вкладке Защита снимите флажок Locked . Нажмите ОК.
2. При выбранном столбце A нажмите « Conditional Formatting на ленте "Домой" и выберите « New Rule... . Оттуда выберите Use a formula to determine which cells to format. Там вы можете ввести формулу =LEFT(A1,3)<>"200" и установить форматирование на красный текст. Нажмите ОК.
3. На ленте обзора нажмите Protect Sheet . Выберите любые настройки, которые вы хотите для защиты.
4. Нажмите Alt+F11, чтобы открыть редактор VBA. На панели VBA Project Explorer дважды щелкните модуль для листа, с которым вы работаете.
   
   Откроется панель текстового редактора. В этой панели вставьте следующий код.

   Private Sub Worksheet_Change(ByVal Target As Range) Dim c As Range, если не пересекается (Target, Range ("A:A")), то ничего для каждого c в цели.Cells If Len (CStr (c.Значение))> = 3 Тогда если осталось (c.Значение, 3) = "200" Тогда я.Снять защиту c.Заблокировано = True Me.Защитить конец, если конец, если следующий c конец, если конец Sub
   

   Это заблокирует ячейки, которые начинаются с "200", а остальные будут разблокированы.