Refreshing Page

[cutescoot24]

I am trying to refresh an opening page (specifically the combo boxes) after
entering information on another page. I can't get my refresh button to work.
This is the code:

Private Sub Refresh_Click()
On Error GoTo Err_Refresh_Click

DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70

Exit_Refresh_Click:
Exit Sub

Err_Refresh_Click:
MsgBox Err.Description
Resume Exit_Refresh_Click

End Sub

Can anyone help me?

 

[Debra Farnham]

If you are simply trying to "refresh" the comboxes, then try something like
this:


HTH

Debra

Private Sub Refresh_Click()
On Error GoTo Err_Refresh_Click

Me.NameofComboBox.Requery

Exit_Refresh_Click:
Exit Sub

Err_Refresh_Click:
MsgBox Err.Description
Resume Exit_Refresh_Click