Hi Phillip,
My name is Dennis Schmidt. Thank you for using the Microsoft Newsgroups.
This following sample demonstrates how you can execute an Access macro from
another application or database using OLE automation.
<><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><><>
<>
*** Resolution *** Dec 9 1999 2:50PM tammyd
1. Create an Access database called C:\TestMacro.mdb
2. Create a macro called macTestMsg with the following action:
MsgBox "Macro in TestMacro database"
3. Create another Access database C:TestMacro2.mdb
4. Create a macro called macTestMsg with the following action:
MsgBox "Macro in TestMacro2 database"
5. In the application you choose, create a reference to the Access 8.0
Object
Library
6. Create the following sub procedure:
Sub RunMacroX()
Dim objACC As New Access.Application
Set objACC = GetObject("D:\TestMacro.mdb") 'open first database
objACC.DoCmd.RunMacro ("macTestMsg") 'run macro
objACC.Quit
Set objACC = GetObject("D:\TestMacro2.mdb") 'open second database
objACC.DoCmd.RunMacro ("macTestMsg") 'run macro
objACC.Quit
Set objACC = Nothing
End Sub
I hope this helps! If you have additional questions on this topic, please
reply to this posting.
Need quick answers to questions like these? The Microsoft Knowledge Base
provides a wealth of information that you can use to troubleshoot a problem
or answer a question! It's located at
http://support.microsoft.com/support/c.asp?M=F>.
This posting is provided "AS IS" with no warranties, and confers no rights.
You assume all risk for your use. © 2001 Microsoft Corporation. All rights
reserved.
Regards,
Dennis Schmidt
Microsoft Support