When you run code that contains the RunCommand method with the acCmdSaveModuleAsText constant, you may receive the following error message:

Back to the top

Microsoft Access cannot save a code module while code is running.

Back to the top

You can use the following method to save a code module programmatically:

1.	Open the sample database Northwind.mdb.
2.	Create a module and type the following line in the Declarations section if it is not already there: Option Explicit
3.	Type the following procedure: Function SaveMod() DoCmd.OutputTo acOutputModule, "Utility Functions" End Function
4.	To test this function, type the following line in the Immediate Window, and then press ENTER: ?SaveMod()
5.	The Output To dialog box appears and prompts you for the file name and file type to save the Utility Functions module.

Back to the top

Option Explicit
					

Function SaveModFail()
   DoCmd.OpenModule "Utility Functions"
   DoCmd.RunCommand acCmdSaveModuleAsText
End Function
					

?SaveModFail()
						

For more information about the OutputTo method, click Microsoft Access Help on the Help menu, type OutputTo in the Office Assistant or the Answer Wizard, and then click Search to view the topic.

For more information about the RunCommand method, click Microsoft Access Help on the Help menu, type RunCommand method in the Office Assistant or the Answer Wizard, and then click Search to view the topic.

Back to the top