changing menu

[Guest]

Hi using Access 2003, I want to change the menu name for all the reports in
an application.

I am wondering whether there a method that I can use in code for each report
in the collection of reports, to change the menu or whether I just have to
methodically work through the entire list of reports manually?

Many thanks

Jonathan

 

[Marshall Barton]

Hi using Access 2003, I want to change the menu name for all the reports in
an application.

I am wondering whether there a method that I can use in code for each report
in the collection of reports, to change the menu or whether I just have to
methodically work through the entire list of reports manually?

I think this will do that:

Dim dbCur As Database
Dim doc As Document
Set dbCur = CurrentDb
For Each doc In dbCur.Containers("Reports").Documents
DoCmd.OpenReport doc.Name, acDesign
Reports(doc.Name).MenuBar = "new name"
DoCmd.Close acReport, doc.Name, acSaveYes
Next doc
Set dbCur = Nothing