editing a code

  • Thread starter Thread starter Tom
  • Start date Start date
T

Tom

I have the following code for a subform

Private Sub Description_AfterUpdate()
If InStr(1, Me.Description, "Approval") <> 0 Then
Call MsgBox("Please, update the Approval Date on the
CASE STATUS LIST !!!")
End If
End Sub

How I can add another condition to the same Description
field after update

If InStr(1, Me.Description, "Receipt") <> 0 Then
Call MsgBox("Please, update the Receipt Date on the
CASE STATUS LIST !!!")
 
You can simply add your second condition between the End If and End Sub of
your current code.
Be sure to add an End If for it, too.

HTH
- Turtle
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Back
Top