Ссылка на Bloomberg API

Question

У меня есть следующий код, который отлично работает с Excel 2010, но из-за обновленного API от Bloomberg этот код не будет работать в Excel 2016. Ссылка BLP_DATA_CTRLLib.BlpData устарела, но я изо всех сил стараюсь использовать новую ссылку API.

Кто-нибудь знает, как обновить ссылку на Bloomberg для хранения котировок?

Function Get_BBG_Price(dataa As Variant, CISI As Long) 

    Dim ReqSecurities As Variant, vtResult As Variant, ReqFields As Variant 
    Dim Arraystr As String 
    Dim oBlp As BLP_DATA_CTRLLib.BlpData 

    ReDim ReqSecurities(1 To UBound(dataa, 1)) 

    For i = 1 To UBound(dataa, 1) 

     ReqSecurities(i) = dataa(i, CISI) & "@IEHY ISIN" ' 

    Next i 

    Set oBlp = New BlpData 

    ' 
    ReqFields = Array("PX_BID") 

    With oBlp 
     .SubscriptionMode = ByRequest 
     .Subscribe ReqSecurities, 1, ReqFields, , , vtResult 
    End With 

    Get_BBG_Price = vtResult 

End Function 

Answer 1

Я смотрел, и похоже, что эта версия кодировки устарела. Я бы понять вы получите ошибки по линии «не может создать объект», но он может скрываться, что в 2016 году

Вы бы, вероятно, хотите использовать C# версии они имеют здесь, https://www.bloomberglabs.com/api/libraries/

Для поместите его в использование, я бы использовал код здесь, http://mikejuniperhill.blogspot.com/2013/06/bloomberg-v3com-api-wrapper-update-for.html * Код слишком длинный или я бы разместил его здесь.