ACC2000: Cannot Use RunCommand acCmdSaveModuleAsText in Code

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

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

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.

Steps to Reproduce Behavior

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 SaveModFail()
      DoCmd.OpenModule "Utility Functions"
      DoCmd.RunCommand acCmdSaveModuleAsText
   End Function
   					

4. To test this function, type the following line in the Immediate window, and then press ENTER:

   ?SaveModFail()
   						

   Note that you receive the following error message:
   The command or action 'SaveModuleAsText' isn't available now.

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.