Clear the value of a filter combo box when adding a new record

[banderson]

Hello,
I have a form and a combo box that I use to filter the form to particular records. I also have an "add new" button that, when clicked, adds a new record. My problem is that the filter combo box stays on the old selection when the new record pops up. I would like to have the combo box clear or set to a default value of "New" when the Add New button is clicked or when the user clicks on the * (new record) button in the navigation bar.

The On Click event code for my add new button is currently:

Private Sub btnAddSiteVisit_Click()
On Error GoTo Err_btnAddSiteVisit_Click
 
    DoCmd.GoToRecord , , acNewRec
 
Exit_btnAddSiteVisit_Click:
    Exit Sub
 
Err_btnAddSiteVisit_Click:
    MsgBox Err.Description
    Resume Exit_btnAddSiteVisit_Click
 
End Sub
 

I had tried to add a requery command and give the combo box a default value, but this did not work. Any advice / help is GREATLY appreciated!

Bridget

[Rabbit]

Add:

Me.cbo_ComboBoxName = "New"
 

After the DoCmd.

[FishVal]

Or something like the following in Form_Current event handler.

Private Sub Form_Current()
    With Me
        If .NewRecord Then .cboYourCombo = .cboYourCombo.DefaultValue
    End With
End Sub
 

This will run whenever form gets to new record - programmatically, via form navigation buttons or via menu commands.

Regards,
Fish.

[NeoPa]

That's a nice idea Fish.
Quite "general purpose" :)

[banderson]

That's a nice idea Fish.
Quite "general purpose" :)

Sorry for the delayed response, I got pulled into another project temporarily. Thank you for these suggestions! I will try them and repost if I have questions.
Best,
Bridget

[banderson]

Sorry for the delayed response, I got pulled into another project temporarily. Thank you for these suggestions! I will try them and repost if I have questions.
Best,
Bridget

Fish's suggested code works perfectly!
Thank you!!!!!!!
Bridget

[NeoPa]

Good for you Bridget, and good luck with your project :)