Access VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Access
  4. The AllReports collection allows you to loop through all reports in the current project
Sub IterateAllReports()
    Dim vnt As Variant
    With CurrentProject
        For Each vnt In .AllReports
            Debug.Print vnt.Name
        Next vnt
    End With
End Sub