I just received a new machine at my workplace that runs Windows 10 (may matter, may not). This code worked perfectly fine on my old computer, but will not work on this new machine. Does anyone know why? Thanks!
I am running this code from excel and the error I get is at "Set accessApp = CreateObject("Access.Application")
Runtime Error 429: ActiveX component can't create object
Run Access DB
Dim accessApp
Set accessApp = CreateObject("Access.Application")
accessApp.Visible = True
accessApp.OpenCurrentDatabase ("Z:\Supply_Chain_Planning\PFEP Metrics\PFEP Governance Metrics\PFEP Union Database.accdb")
accessApp.DoCmd.RunMacro "RefreshData"
Application.DisplayAlerts = True
I am running this code from excel and the error I get is at "Set accessApp = CreateObject("Access.Application")
Runtime Error 429: ActiveX component can't create object
Run Access DB
Dim accessApp
Set accessApp = CreateObject("Access.Application")
accessApp.Visible = True
accessApp.OpenCurrentDatabase ("Z:\Supply_Chain_Planning\PFEP Metrics\PFEP Governance Metrics\PFEP Union Database.accdb")
accessApp.DoCmd.RunMacro "RefreshData"
Application.DisplayAlerts = True