Question

我已经构建了一个UserForm，我希望将一些市场数据从Bloomberg传输到Excel工作表中。我启动UserForm，它显示正确的初始数据，但是当电子表格中的数据更新时，它不会在UserForm TextBox中更新。这是有道理的，但我正在寻找一种解决方法。有没有办法让它流式传输这些数据并实时更新？或者我应该使用TextBox以外的东西吗？

感谢任何帮助。

以下是我用来绘制初始值的代码：

Private Sub MonitorOnly_Click()

Sheets("Log").Activate

OTCBid.Text = Range("C3")
OTCAsk.Text = Range("D3")
OTCBidSize.Text = Range("E3")
OTCAskSize.Text = Range("F3")

ICEBid.Text = Range("C5")
ICEAsk.Text = Range("D5")
ICEBidSize.Text = Range("E5")
ICEAskSize.Text = Range("F5")

End Sub

Answer 1

想出来。我可以使用TextBox的.ControlSource属性将TextBox链接到流数据。以下是工作代码的样子：

Private Sub MonitorOnly_Click()

Sheets("Log").Activate

OTCBid.ControlSource = "=C3"
OTCAsk.ControlSource = "=D3"
OTCBidSize.ControlSource = "=F3"
OTCAskSize.ControlSource = "=E3"

ICEBid.ControlSource = "=C4"
ICEAsk.ControlSource = "=D4"
ICEBidSize.ControlSource = "=F4"
ICEAskSize.ControlSource = "=E4"

End Sub

允许在VBA UserForm中传输流数据

1 个答案: