You can not carry out this action at the present time Error

[Mikeauz]

Hi,
(Access 2000)
I'm using append queries, pulling from pass through queries to append data to access tables.

These have worked for ages without change but now when I try to run the below code I get the error 'You can not carry out this action at the present time' on each of the .openquery lines.

The funny thing is that the append queries work fine if I run them manually.

Thanks for any Help
Mike




Function Import()

DoCmd.OpenQuery "QryImportCallsByUser_ODBC"
DoCmd.OpenQuery "QryAppendMTDAHT"
DoCmd.OpenQuery "QryAppendShortCalls"
DoCmd.OpenQuery "QryAppendDealerSupport"
DoCmd.OpenQuery "QryAppendDeviations"
DoCmd.OpenQuery "QryImport"
DoCmd.OpenQuery "QryMacroLog"

Application.Quit

End Function

 

[Crowley16]

are you opening a table in design mode? or even another query in design mode?

--------------------
Procrastinate Now!

 

[Mikeauz]

Crowley,

Thanks for answering but not opening the queries or tables in design mode