用户select随机的Excel单元格,点击button,macros执行 – Bloomberg DDE

我对macros和新的这个论坛是比较新的。 我search了论坛,并没有find我正在寻找的答案。 我正在编写一个macros来启动彭博DDE,所以当点击一个button时,terminal窗口会以特定的语法提交到前台。

一般来说,假设$ B $ 3 = MSFT,$ H $ 2 = CSCO,$ E $ 9 = GIS

如果用户在电子表格上select了MSFT,然后点击GIP30button,我想把以下内容发送到BBterminal:

MSFT GIP30

因此,除了macros识别select了什么单元外,“US”可能需要在被传送到BB DDE之前附加。 我从网上收集了一些消息。

当我硬编码“MSFT美国”,但需要它是dynamic的。 我注释掉了“dynamic”代码。

所有的帮助表示赞赏。

谢谢。

Sub OpenGIP() Dim ch As Long ch = DDEInitiate("winblp", "bbk") 'Opens Bloomberg window #2 (Note: <blp-n> - where n is [BB Window instance # - 1]) Call DDEExecute(ch, "<blp-1><home> MSFT US <EQUITY> GIP30 <GO>") 'Call DDEExecute(ch, "<blp-1><home> ActiveCell.Value & ' US' <EQUITY> GIP30 <GO>") Call DDETerminate(ch) End Sub 

尝试这个

 Call DDEExecute(ch, "<blp-1><home> " & ActiveCell.value & " US <EQUITY> GIP30 <GO>")