Очистка ячейки J, если ячейка B больше ячейки G

Question

Я пытаюсь внедрить базовую систему управления запасами.

Проект можно найти здесь, а картинку здесь.

В основном, когда запас ниже уровня повторного заказа (B <= G), заказывать запас? столбец (I) должен показать да. Когда сотрудник заказывает запас, они отмечают Заказано? (J) столбец как Да. Это должно тогда вызвать заказ акций? (I) столбец должен быть пустым. Это работает до сих пор.

Проблема заключается в том, что когда мы получаем больше запасов, это вводится в лист получения, изменяя значение количества в запасе (B). Я хотел бы, чтобы, если B> G, ясно, J. Это, похоже, не работает, но я не могу понять, почему.

Код VBA, который я использую:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 2 Then Exit Sub
Application.EnableEvents = False
If Cells(Target.Row, 2) > Cells(Target.Row, 7) Then
    Cells(Target.Row, 10).Value = ""
Else
    Cells(Target.Row, 9).Value = "Yes"
End If
Application.EnableEvents = True
End Sub

Если бы кто-нибудь мог указать мне правильное направление, это было бы оценено.

Answer 1

Добрый день!

Что происходит, так это то, что при вводе данных в полученный лист не запускается Worksheet_Change of Stock sheet. Когда вы изменяете данные в Полученном листе, так как у вас есть формула в столбце B Листа, вызывается событие Worksheet_Calculate.

Я загрузил измененное для вас сообщение здесь, где я сделал для вас данные обновления бланка Worksheet_Change of Received.

Пожалуйста, не стесняйтесь задавать дополнительные вопросы.

С уважением!