Всплывающее окно сообщения при вводе определенного значения в ячейку - PullRequest
Новая
       5

Всплывающее окно сообщения при вводе определенного значения в ячейку

0 голосов
/ 21 мая 2019

У меня есть электронная таблица, для которой нужно всплывающее окно с сообщением, если в отдельной ячейке указано «ОН». Как только появится сообщение, я хочу нажать «ОК» и двигаться вперед.

В настоящее время у меня есть: 

Private Sub OH_MSG_Click()

If ThisWorkbook.Worksheets("Zip Code Entry").Range("State").Value = "OH" Then
  MsgBox "Please review OH Underwriting Guidelines."
End If

End Sub

Это работает, если я запускаю вручную, но как мне заставить его работать автоматически, как только State = OH?

1 Ответ

0 голосов
/ 21 мая 2019
  1. Откройте Microsoft Visual Basic для приложений в файле Excel.
  2. Щелкните правой кнопкой мыши свой рабочий лист в представлении Pojekt (слева).
  3. Выберите вид кода. Теперь появится окно кода.
  4. В верхнем левом раскрывающемся меню окна «Код» выберите «Рабочий лист».
  5. В выпадающем меню справа выберите «Изменить». Затем поместите ваш код (примерно так) Пример: 
Private Sub Worksheet_Change(ByVal Target As Range)
If (Target.Address = "$A$2") Then
If (Range("A2").Value = "OH") Then
MsgBox "Some message"
End If
End If
End Sub

Это означает: если выбран A2 И любая ячейка в этом рабочем листе изменилась, макрос проверит If ("A2"). Value = "OH") Если true, появится поле Msg. false ничего не случилось.

...