print list of forms

[Guest]

Is there a way to print a list of all forms in an app?

Thanks!

 

[Guest]

You can use the following to print them to the Debug window (Ctrl-G):

Dim db As Database
Dim con As Container
Dim doc As Document

Set db = CurrentDb()
Set con = db.Containers("Forms")

For Each doc In con.Documents
Debug.Print doc.Name
Next doc

Sprinks

 

[Bill Edwards]

You could create a report and set it's recordsource to:

SELECT [Name] FROM MSysObjects WHERE [Type]= -32768;

 

[Guest]

Better yet, Bill. Thanks.

You could create a report and set it's recordsource to:

SELECT [Name] FROM MSysObjects WHERE [Type]= -32768;

Is there a way to print a list of all forms in an app?

Thanks!