2017-01-22 2 views
0

VBA가 실행되는 동안 Bloomberg 수식이로드되지 않는 문제가 있습니다. BloombergUI를 사용하여 문제를 해결하고 싶습니다.Excel/VBA - BloombergUI.Subscribe를 사용하여 BDS를 가져 오는 방법은 무엇입니까?

콜린 레그 (Colin Legg)의 응답 here은 BDP 데이터를 가져 오는 데 적합하지만 BDS 수식에서는 작동하지 않습니다. 아무도 코드를 수정하는 방법을 알고 있습니까?

Dim xlCalc As XlCalculation Sub Test1() 
    'early bound - reference to Bloomberg 

    'save the calculation setting and then set to automatic 
    xlCalc = Application.Calculation 
    Application.Calculation = xlCalculationAutomatic 

    Sheet1.Range("C2:H4").Formula = "=BDP($B2,C$1)" 
    BloombergUI.RefreshAllStaticData 
    Application.OnTime Now + TimeValue("00:00:02"), "HardCode" End Sub Sub HardCode() 
    Sheet1.Range("C2:H4").Value = Sheet1.Range("C2:H4").Value 
    Application.Calculation = xlCalc End Sub 

답변

관련 문제