Combo Box If Then statement finding certain text in input

[element32d]

I'm not very good at VBA code yet, but I think this is possible:

There's a combo box that a user selects something from a list and I want it so that if the user selects something with "A" in it, then when they click the button it goes to form letter "A" or if the user selects something with letter "B" in it, then when they click the button it goes to form "B".



Help would be appreciated, thank you!

[pbaldy]

How about:

If Me.ComboName = "A" Then
  'open the a form
ElseIf Me.ComboName = "B" Then
  'open the b form
End If

Though I suspect there's more to it.

[element32d]

How about:

If Me.ComboName = "A" Then
  'open the a form
ElseIf Me.ComboName = "B" Then
  'open the b form
End If

Though I suspect there's more to it.

Yea sorry I should have used a better example. The choice is longer than just "A" or "B". So the user can choose something like CA003 or CB003 and I want the code the find that letter or string of letters somewhere in that whole text.

So basically, it contains A or B somewhere in the choice. Is this more clear?

[pbaldy]

Check out the InStr() function, which will test for a given letter.

[element32d]

I found that in my google searches, although most if not all results dealt with excel and I wasn't sure if it could translate into combo boxes for access or not.

[pbaldy]

Sure; this:

If Me.ComboName = "A" Then

becomes

If InStr(1, Me.ComboName, "A") > 0 Then

[element32d]

I'll try that out tomorrow and give you feedback once I get it to work, thanks a lot!

[pbaldy]

No problem!

[element32d]

I tried implementing your suggested code. It's giving me a "method or data member not found" error and highlighting combobox name in the me.combobox part of the if statement. My combobox name is "ID#" so that line of code currently looks like

If InStr(1, Me.ID#, "55-1") > 0 Then

The event procedure is currently in the "on click" portion of the button if that matters.

[pbaldy]

With the inadvisable symbol in the name, you'll generally have to bracket the name: [ID#]

[element32d]

Ah yes, I just came in here to say I renamed the combobox name and it worked perfectly. But the brackets will be the better solution. Thank you very much.

[pbaldy]

No problem. In my opinion not using spaces or symbols is the better solution.