Всплывающее окно или уведомление в зависимости от измененной ячейки - PullRequest
0 голосов
/ 16 июня 2020

У меня один live excel, где в одном столбце значение постоянно меняется. Если значение изменится более чем на 50000, я должен получить уведомление для этой конкретной ячейки.
Как если бы изменение в "E5" я получил бы уведомление об этом же.

Уведомление может быть любым, как сообщение, всплывающее , если он может хранить в другом столбце, тоже подойдет.

1 Ответ

0 голосов
/ 16 июня 2020

Вы можете сделать это, если поместите количество раз, когда эта ячейка была изменена, в ячейку (например, «A1» в следующем фрагменте кода):

Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Row = 5 And Target.Column = 5 Then
    Range("A1").Value = Range("A1").Value + 1
  End If
  If Range("A1").Value = 50000 Then
    MsgBox ("Cell E5 has been changed 50000 times")
    Range("A1").Value = 0
  End If
End Sub

Событие Worksheet_Change запускается каждый раз, когда что-то меняется в вашем листе. Выбрав целевой объект «E5» (номер строки и столбца - 5), вы уверены, что проверяете правильную ячейку.

В случае, если ваш вопрос другой («Что делать, если кто-то помещает значение в ячейка больше 5000 "), тогда все становится еще проще (не нужно ничего помещать в ячейку" A1 "для начала), а что касается кода:

Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Row = 5 And Target.Column = 5 And Target.Value >= 50000 Then
    MsgBox ("The value you're trying to enter in cell E5 is too large")
  End If
End Sub
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...