Requery Issue

[rjackson]

2nd time poster here but very helpful site. I have a project I am working on and have 2 comboboxes cascading (AdminCombo and AccountCombo)to display a set of records on the same form, no subforms. Boxes are working fine and the data comes up fine with my selection but when I created the 2nd box I used the wizard and chose the 3rd option "Find a record on my form based on the value I selected in my combo box" and it created an embedded macro that i converted to vba so I could add the requery code in the after update code but it is not working. Here is the code that was converted to vba. I have tried adding AdminCombo.requery and me.AdminCombo.requery too but the data in the second combobox does not change.

Private Sub AccountCombo_AfterUpdate()
On Error GoTo AccountCombo_AfterUpdate_Err
DoCmd.SearchForRecord , "", acFirst, "[EventAccount_Account] = " & "'" & Screen.ActiveControl & "'"
AccountCombo_AfterUpdate_Exit:
Exit Sub
AccountCombo_AfterUpdate_Err:
MsgBox Error$
Resume AccountCombo_AfterUpdate_Exit
End Sub


Any suggestions would be great.

Thanks,
rj

 

[jackd]

Try using Me.Requery to refresh the whole form.

 

[rjackson]

Just tried that this morning and still not refreshing the first combobox. I am putting the code just before end sub.

Thanks,
rj

 

[boblarson]

I don't get why you would requery the first combo from the second. That isn't the way it is supposed to work in a Cascading Combo situation. You would requery the SECOND combo in the first's After Update event, not the other way around.

 

[alansidman]

What happens if you put it after the DoCmd line?

Alan

 

[rjackson]

No change to the combobox and it stops the records from changing to the record that was selected in the 2nd combobox.

 

[rjackson]

I don't get why you would requery the first combo from the second. That isn't the way it is supposed to work in a Cascading Combo situation. You would requery the SECOND combo in the first's After Update event, not the other way around.

Damnit man....thanks. Bassakwards I had it. Thanks for the obvious. :D