在这种情况下,我尝试使用SetLinkOnData调用此代码来调用一个简单的宏“ msg”,我只是想检测DDE链接提供的值的变化,但是我收到了此错误:“预期的编译错误:声明结束” 如果有人指示我如何正确使用SetLinkOnData或一种方法来检测DDE Link给定值的变化,这将是很好的,这是我的代码:
Sub UpDateDDE()
Dim Mylink As String
Dim Procedure As String
Mylink = "MT4|BID!EURJPY"
Procedure = "msg"
With ThisWorkbook.SetLinkOnData Mylink Procedure
End Sub
Sub msg()
MsgBox "new value detected!"
End Sub
答案 0 :(得分:0)
更改为:
ThisWorkbook.SetLinkOnData Mylink, Procedure