![]() |
Access Macro in a Module
Hi,
I want to run a access macro which is in a module for Excel. I have tried aAccess.DoCmd.RunMacro "GetNewAFMAGreen" which gives me a error - Microsoft Access can't find the macro 'GetNewAFMAGreen.'@ What do I do now to run it Thanks MarkS |
Access Macro in a Module
This is VBA for Access that's stored in a module in an excel workbook?
I'd be very surprised that you could even get the code to compile in excel... I don't speak the Access, but couldn't you keep the code there and run it from Excel? MarkS wrote: Hi, I want to run a access macro which is in a module for Excel. I have tried aAccess.DoCmd.RunMacro "GetNewAFMAGreen" which gives me a error - Microsoft Access can't find the macro 'GetNewAFMAGreen.'@ What do I do now to run it Thanks MarkS -- Dave Peterson |
Access Macro in a Module
Found out a bit more I am in Excel trying to run the access Procedure I use
this code ' Set up Set aAccess = New Access.Application aAccess.Visible = True ' Open the database aAccess.OpenCurrentDatabase ("S:\STAR\risk\Quantitative Risk\Forward Curve\AFMA Green\AFMA_Green.mdb") ' Run the Procedure aAccess.DoCmd.OpenModule "Load AFMA Data", "GetNewAFMAGreen" ' aAccess.DoCmd.RunMacro "GetNewAFMAGreen" ' Clean up and shut down aAccess.Quit Set aAccess = Nothing unfortunately it still has the same problem Thanks MarkS |
Access Macro in a Module
can you convert the macro into a query? (ie a SQL statement)
"MarkS" wrote: Found out a bit more I am in Excel trying to run the access Procedure I use this code ' Set up Set aAccess = New Access.Application aAccess.Visible = True ' Open the database aAccess.OpenCurrentDatabase ("S:\STAR\risk\Quantitative Risk\Forward Curve\AFMA Green\AFMA_Green.mdb") ' Run the Procedure aAccess.DoCmd.OpenModule "Load AFMA Data", "GetNewAFMAGreen" ' aAccess.DoCmd.RunMacro "GetNewAFMAGreen" ' Clean up and shut down aAccess.Quit Set aAccess = Nothing unfortunately it still has the same problem Thanks MarkS |
Access Macro in a Module
when you say it doesn't work, you must be getting some messages back?
This code - in an EXCEL Standard Module - opens an Access database and executes a procdure in the Access Database's standard module. in my example the sub "AddAColumn" is in Module1 of the Access Database's code module's Sub contoAccess() Dim aAccess As Object 'Access.Application Set aAccess = CreateObject("Access.application") aAccess.Visible = True ' not required' Open the database aAccess.OpenCurrentDatabase ("E:\Excel\Excel_Demos\Risk.mdb") aAccess.Run "AddAColumn" ' Clean up and shut down aAccess.Quit Set aAccess = Nothing End Sub "MarkS" wrote: Found out a bit more I am in Excel trying to run the access Procedure I use this code ' Set up Set aAccess = New Access.Application aAccess.Visible = True ' Open the database aAccess.OpenCurrentDatabase ("S:\STAR\risk\Quantitative Risk\Forward Curve\AFMA Green\AFMA_Green.mdb") ' Run the Procedure aAccess.DoCmd.OpenModule "Load AFMA Data", "GetNewAFMAGreen" ' aAccess.DoCmd.RunMacro "GetNewAFMAGreen" ' Clean up and shut down aAccess.Quit Set aAccess = Nothing unfortunately it still has the same problem Thanks MarkS |
Access Macro in a Module
Excel won't look for names in another workbook unless you tell it where it is located. what si tthe error you are getting and at which lin eof code. aAccess.DoCmd.OpenModule "AFMA_Green.mdb!Load AFMA Data", _ "GetNewAFMAGreen" -- joel ------------------------------------------------------------------------ joel's Profile: http://www.thecodecage.com/forumz/member.php?userid=229 View this thread: http://www.thecodecage.com/forumz/sh...d.php?t=145834 |
All times are GMT +1. The time now is 12:33 PM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com