NYFashionToGo
Technical User
I could use a bit of advice.... I have created a w access macro that I needed to refine. So I converted it to a Module and made the adjustments..... The original macro was controled from excel. And I am trying to get the converted Access Macro, to run the same way....
Originally in Excel I had This code: to do this
Sub UploadToAccess()
Dim appAcc As Object
Set appAcc = CreateObject("Access.Application")
appAcc.Visible = False
appAcc.OpenCurrentDatabase ("C:\NYFashionToGo\NYFOrderProcessing.mdb")
appAcc.DoCmd.RunMacro "Import Sales and Payments Info Macro"
appAcc.Quit
End Sub
I been trying to Update it to run the Module with no success:
Sub UploadToAccess()
Dim appAcc As Object
Set appAcc = CreateObject("Access.Application")
appAcc.Visible = False
appAcc.OpenCurrentDatabase ("C:\NYFashionToGo\NYFOrderProcessing.mdb")
appAcc.DoCmd.RunModules "Converted Macro- Import Sales and Payments Info Macro"
appAcc.Quit
End Sub
I am unsure what I am doing wrong or what I am supposed to do to get this application to work. Thank You In Advance.
Originally in Excel I had This code: to do this
Sub UploadToAccess()
Dim appAcc As Object
Set appAcc = CreateObject("Access.Application")
appAcc.Visible = False
appAcc.OpenCurrentDatabase ("C:\NYFashionToGo\NYFOrderProcessing.mdb")
appAcc.DoCmd.RunMacro "Import Sales and Payments Info Macro"
appAcc.Quit
End Sub
I been trying to Update it to run the Module with no success:
Sub UploadToAccess()
Dim appAcc As Object
Set appAcc = CreateObject("Access.Application")
appAcc.Visible = False
appAcc.OpenCurrentDatabase ("C:\NYFashionToGo\NYFOrderProcessing.mdb")
appAcc.DoCmd.RunModules "Converted Macro- Import Sales and Payments Info Macro"
appAcc.Quit
End Sub
I am unsure what I am doing wrong or what I am supposed to do to get this application to work. Thank You In Advance.