Pop up box needed

[msmit8]

Line_of_Business field list contains:


·AUDIT
·COMMERCIAL LINES
·PERSONAL LINES
·CLAIMS DEDUCTIBLE

I would like to have a message pop up whenAUDIT is selected from the Line_of_Business field. The message will remindfolks to make sure something is completed. Is there a way to add a pop upmessage with these conditions?

Thanks for your help!

[pbaldy]

Sure, in the after update event of the combo:

If Me.ComboName = "Audit" Then
  MsgBox "Whatever"
End If

[msmit8]

Do I need a macro in order to do what you are suggesting? See this message:



This is what my expression looks like in the After Update line of the Combo Box properties menu.



Any tips on what I'm doing wrong.

Thanks for all your help. Much appreciated!

[pbaldy]

What I posted was VBA code:

http://www.baldyweb.com/FirstVBA.htm

[msmit8]

Perfect. That worked. Thank you very much!

[msmit8]

Spoke too soon.

I'm getting a error message:

"This form or report contains changes that are incompatible with the current database format. The form or report was not saved.

In order to save your changes, you must remove any layouts that have empty cells in them and/or set the HasModule property for the form or report to No."

Here is a screen shot my code:



Thanks again for your help!

[pbaldy]

That's really basic code that should work in any version. Could there be something else that was changed?

[msmit8]

No. Could it have something to do with the Line_of_Business field being set up as a Table/Query. So all of the options below point back to a separate table.

AUDIT
COMMERCIAL LINES
PERSONAL LINES
CLAIMS DEDUCTIBLE

[June7]

Related thread https://www.accessforums.net/access/...ded-48402.html. I expect will have the same issue with code in that thread.

Sounds like you are using lookups with alias in table. Advise not to do that. http://access.mvps.org/access/lookupfields.htm

If the actual value of field is an ID, not the descriptive ("Audit", etc), then the code needs to use the ID as parameter.

If Me.Line_Of_Business = 1 Then

And combobox needs to include the ID as a column in the RowSource.

[msmit8]

Thanks for all your help. This thread is now closed.