ACC: Err Msg "The Other Application Quit" with MS Excel 4.0 (103258)
The information in this article applies to:
- Microsoft Access 1.1
- Microsoft Access 2.0
- Microsoft Access for Windows 95 7.0
- Microsoft Access 97
This article was previously published under Q103258 SYMPTOMS
Advanced: Requires expert coding, interoperability, and multiuser skills.
When you are quitting Microsoft Excel over a dynamic data exchange (DDE)
channel in Microsoft Access versions 1.1, 2.0, and 7.0, you may receive the
following error message:
The Other Application Quit
In Microsoft Access 97, you may receive the following error message:
Run-time error '291'.
The other application in the DDE conversation quit unexpectedly.
Restart the other application before reinitiating the DDE conversation.
CAUSE
Microsoft Excel version 4.0 automatically closes down any open DDE channels
when quitting, rather than waiting for the DDE channels to be closed properly.
RESOLUTION
You can use one of the following two methods to work around this behavior.
First, you can add an On Error Resume Next statement to your Microsoft
Access function before the DDE quit command. The following sample function
demonstrates this method:
Function CallExcel ()
Dim chan
x = Shell("c:\excel\excel.exe c:\excel\macro1.xlm", 1)
chan = DDEInitiate("Excel", "System")
DDEExecute chan, "[Run(""macro1.xlm!Message"")]"
AppActivate "Microsoft excel"
On Error Resume Next
DDEExecute chan, "[quit]"
DDETerminate chan
End Function
Second, you can have Microsoft Excel quit on its own, rather than having
Microsoft Access send the quit instruction. You can do this by having the
second to last line in a Microsoft Excel macro call another macro. The
first macro will contain a line similar to
=ON.TIME(NOW()+"0:0:3","Leave")
that will call a second macro in three seconds. The second macro will
contain the two lines:
=QUIT()
=RETURN()
You can remove the DDE quit command from your Microsoft Access function
if you use this method.
REFERENCES
For more information about the DDEInitiate() function, search the Help
Index for "DDEInitiate," or ask the Microsoft Access 97 Office Assistant.
| Modification Type: | Minor | Last Reviewed: | 10/11/2006 |
|---|
| Keywords: | kberrmsg kbinterop kbprb kbProgramming KB103258 |
|---|
|