assuming you are using docmd.openform and the forms are not modal you could have code after the openform to populate the form open event with a call to a function in a standard module.
your module code might be something like this (not tested) - note this is a public function
Code:
Public Function FormOnOpen(frm as Form)
Dim NewMenu As Object
On Error Resume Next
wiith frm
CommandBars("test").Delete
Set NewMenu = CommandBars.Add("test", 5, False, True)
NewMenu.Controls.Add 1, 10093, , , True
NewMenu.Controls.Add 1, 19, , , True
NewMenu.Controls.Add 1, 22, , , True
NewMenu.Controls.Add 1, 499, , , True
NewMenu.Controls.Add 1, 497, , , True
end with
End Sub
and to use
docmd.openform "myForm"
FormOnOpen forms("myForm")
Alternatively you could have code to open each form in turn in design view and add the following to the open event
"=FormOnOpen([Form])"
plenty of examples out there how to loop through the forms collection