I wanted to adapt the AdfinX Real Time code from Excel into a MS Access project. Unfortunately I get a Run-Time error '53' File not found: PLVbaApis.dll when I exectue the code. It works within Excel but not MS Access seems that there are som path information missing. I've tried as well to declare with the full path, copying it to alternative folders, etc... Does someone have an idea on how configure the ms access project so this AdfinXrt stuff will work? See code below
Private WithEvents mAdxRtList As AdfinXRtLib.AdxRtList
Private mEventHandler As IRecordEventHandler
Private mResult() As Variant
Private Declare PtrSafe Function CreateReutersObject Lib "PLVbaApis.dll" (ByVal progID As String) As Object
Private Sub Class_Initialize()
'ChDir "C:\Program Files (x86)\Thomson Reuters\Eikon\Y\Bin" 'CurrentProject.Path
Set mAdxRtList = CreateReutersObject("AdfinXRtLib.AdxRtList")
I have attached a sample Access project which shows how to access Real Time data using EikonDesktopDataAPI in Access.
Please speak to your account manager to ensure your legal agreement with Thomson Reuters covers you for this kind if data usage.
Regarding PtrSafe I've put that because of the documentation of Thomson Reuters where they recommend to use it if using VBA7. Defining the full path within the declare statement does not help. Same error - I guess there are dependencies to the PLVbaApis.dll which can't be resolved because of not having a default search path.
CreateReutersObject() only works in the context of MS Excel. You will have to use EikonDesktopData API. Basically, instead of creating the objects manually, you will use an internal method of the API, for instance:
Set EikonConnect = New EikonDesktopDataAPI.EikonDesktopDataAPI() ... Set AdxRtList = eikonConnect.CreateAdxRtList()