Question

我安装了PPP.xla，DDE.xla，PPPInit.xla加载项。但我不知道这些加载项的受保护密码。如果我想触发[市场数据引擎重启]，我应该调用哪个函数？

Call Application.Run("???")

我想要这个的原因是becoz有时当我使用RtHistory（“IDN”,,,,），它不起作用（返回“#N / AN / A”），除非我重新启动PowerPlusPro.exe或当我点击路透工具栏中的[重新启动数据引擎]。我想通过使用VBScript调用Excel来自动执行此RtHistory作业。因此，我必须具有此函数名称才能在获取数据之前触发重新启动。

有专家对此有何看法？非常感谢。

Answer 1

我遇到了同样的问题。我通过重新激活powerplus pro addin解决了这个问题。

sub yourSub()
 Dim wbName As String

 wbName = ActiveWorkbook.Name
 Call activateAddIn("PowerPlus Pro Excel v5.1")
 Workbooks(wbName).Activate

end sub

'/**
' ReActivate AddIn
'**/
Public Function activateAddIn(AddinName As String) As Boolean
    AddIns(AddinName).Installed = False
    AddIns(AddinName).Installed = True
    Sleep 5000
End Function

欢呼

斯蒂芬

VBA触发市场数据引擎重启

1 个答案: