Mega Code Archive

 

Categories / VisualBasic Script / Access

 

Use the report object variable to point at each report in the Reports collection

Sub IterateOpenReports()     Dim myReport As Report     For Each myReport In Reports         Debug.Print myReport.Name     Next myReport End Sub