Enumerating report name

[SF]

How do I enumerating report name through code?

SF

 

[Alex Dybenko]

not almost clear what you asked...
to get report name where code runs - use me.name
to enumerate all reports in database you can use CurrentProject.AllReports
collection

 

[Brendan Reynolds]

Assuming Access 2000 or later ...

Dim aob As AccessObject

For Each aob In CurrentProject.AllReports
Debug.Print aob.Name
Next aob

--
Brendan Reynolds (MVP)
http://brenreyn.blogspot.com

The spammers and script-kiddies have succeeded in making it impossible for
me to use a real e-mail address in public newsgroups. E-mail replies to
this post will be deleted without being read. Any e-mail claiming to be
from brenreyn at indigo dot ie that is not digitally signed by me with a
GlobalSign digital certificate is a forgery and should be deleted without
being read. Follow-up questions should in general be posted to the
newsgroup, but if you have a good reason to send me e-mail, you'll find
a useable e-mail address at the URL above.

 

[Douglas J. Steele]

And if using Access 97 or earlier:

Dim dbCurr As DAO.Database
Dim docCurr As Document

Set dbCurr = CurrentDb()
For Each docCurr In dbCurr.Containers("Reports").Documents '
docCollection
Debug.Print docCurr.Name
Next docCurr