View Single Post
  #3  
Old May 7th, 2010, 01:59 PM posted to microsoft.public.access.forms
Joe
external usenet poster
 
Posts: 1,218
Default Cascading Combo Box - help needed please.

Thanks Arvin - I think I see what you mean however I'm unsure how to achieve
the solution to my problem. Of the three services available for selection in
the first combo, one selection (B) must also have a specific role (function)
attached to some but not all of the ranks in combo2. I had hoped that this
could be achieved using cascading combo boxes.
--
Joe


"Arvin Meyer [MVP]" wrote:

I think because none of the Cases are matching for cboRank, and since all of
the values sought are TblFunction anyway, why would you even want a Case
statement?
--
Arvin Meyer, MCP, MVP
http://www.datastrat.com
http://www.accessmvp.com
http://www.mvps.org/access


"Joe" wrote in message
news
I have 3 dependent combo boxes.

CboService has TblService as RowSource with bound col = 2; col count = 2;
col width 0cm;2cm and the following code in after update...
Private Sub CboService_AfterUpdate()
On Error Resume Next
Select Case CboService.Value
Case "A"
CboRank.RowSource = "TblA"
Case "B"
CboRank.RowSource = "TblB"
Case "C"
CboRank.RowSource = "TblC"
End Select
End Sub

CboRank has bound col = 1; col count = 2; col width 0cm;2.5cm and the
following code in the after update event...
Private Sub CboRank_AfterUpdate()
On Error Resume Next
Select Case CboRank.Value
Case "B1"
CboFunction.RowSource = "TblFunction"
Case "B3"
CboFunction.RowSource = "TblFunction"
Case "B7"
CboFunction.RowSource = "TblFunction"
End Select
End Sub
CboFunction has bound col = 1; col count = 3; col width 0cm; 2.5cm; 0cm

Combos 1&2 populate without any problem however I just can't seem to be
able
to get combo 3 to populate.

I would be very grateful for any help and if there is a better way to
write
the above code I would appreciate the advice.

Many thanks,

Joe
--
Joe



.