CJBIRKIN Drink! Local time Today, 23:11 Joined May 10, 2002 Messages 255 Sep 26, 2002 #1 Hello Does anyone know how to find out all the reports currently open? Chris
Drevlin Data Demon Local time Today, 23:11 Joined Jul 16, 2002 Messages 135 Sep 26, 2002 #2 Dim obj As AccessObject, dbs As Object Set dbs = Application.CurrentProject For Each obj In dbs.AllReports If obj.IsLoaded = True Then Debug.Print obj.Name End If Next obj
Dim obj As AccessObject, dbs As Object Set dbs = Application.CurrentProject For Each obj In dbs.AllReports If obj.IsLoaded = True Then Debug.Print obj.Name End If Next obj
CJBIRKIN Drink! Local time Today, 23:11 Joined May 10, 2002 Messages 255 Sep 26, 2002 #3 HELLO Nice one cheers! Chris