VBA‎ > ‎

Another way to refresh all forms in Access database

Refresh issues in Microsoft Access are always a pain, especially in Access forms with various subforms.   Trying using this code to refresh all open forms.
PASTE THIS VBA CODE into your database:
Public Sub RefreshAllForms()
Dim objFrm As Object
Dim strFrm As String
Dim ctl As Control
For Each objFrm In CurrentProject.AllForms
  If objFrm.IsLoaded Then
    strFrm = objFrm.Name
    For Each ctl In Forms(strFrm).Controls
      If (ctl.ControlType = acComboBox) Or (ctl.ControlType = acListBox) Then
      End If
    Next ctl
  End If
Next objFrm
End Sub