Creating Msg. Box
Hello!
I am trying to determine if there a value ("ADD") doesn't exist in the
sheet, to end the macro and have a box that says "You must note an Add
line, stupid."
Any ideas?
All I have at this point is a macro that I recorded that will find
"add"
Do
If Cells.Find(What:="add", After:=ActiveCell,
LookIn:=xlFormulas, LookAt:=
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
MatchCase:=False _
, SearchFormat:=False).Activate = False
Thanks Everyone!
|