Auto Combo Box Entry

[pushrodengine via AccessMonster.com]

Hello,
I would like to automate a combo box entry based another combo box entry.
When either the text “BP Check†or “First Aid“ is entered into combo box
labeled “Typeâ€, the text “Public Relations†should automatically be entered
into combo box “CallDetailâ€

Thanks

 

[John W. Vinson]

Hello,
I would like to automate a combo box entry based another combo box entry.
When either the text “BP Check” or “First Aid“ is entered into combo box
labeled “Type”, the text “Public Relations” should automatically be entered
into combo box “CallDetail”

Thanks

How to do this depends a bit on how your combo is structured. Is the combo box
CallDetail in fact bound to a Text field containing text strings such as
"Public Relations"? Or is the combo a more typical lookup, displaying a text
value but actually storing a number? What's its Control Source, and what's the
datatype of that field?

 

[pushrodengine via AccessMonster.com]

Is the combo box CallDetail in fact bound to a Text field containing text strings such as

"Public Relations"?
Yes

Or is the combo a more typical lookup, displaying a text value but actually storing a number?
No

What's its Control Source,
CallDetail

and what's the datatype of that field?

Text



Thanks

 

[John W. Vinson]

Hello,
I would like to automate a combo box entry based another combo box entry.
When either the text “BP Check” or “First Aid“ is entered into combo box
labeled “Type”, the text “Public Relations” should automatically be entered
into combo box “CallDetail”

In that case... put the following code into the Type combo's AfterUpdate
event:

Private Sub Type_AfterUpdate()
If Me![Type] = "BP Check" OR Me![Type] = "First Aid" Then
Me!CallDetail = "Public Relations"
End If
End Sub

 

[pushrodengine via AccessMonster.com]

Works perfect thank you, John W. Vinson.