My code checks if a transaction is done correctly, and if it is not, puts a
formula that displays the word "Violation" in a cell next to the transaction.
In the following section,
the code checks if the word "Violation" is
displayed anywhere in the sheet. If there are no Violations, it displays a
message box stating this, and if there is a violation, it goes to the first
cell that displays "Violation".
On Error GoTo errTrap
Answer = MsgBox("No Violations Found", vbOKOnly)
What I'd like to
add is code that, if "Violation" was found, pops up a
message box stating, "Violation Found".
If the line below finds something (or
doesn't produce an error)
MsgBox("Violation Found", vbOKOnly)
What code would do this?
Thanks in advance.