excel - VBA を使用してセルのコメントを表示する (コメントはアクティブなブルームバーグ式)

Question

強調表示されているセルのブルームバーグ BDP 情報を表示する「コメント」を Excel で作成しようとしています。たとえば、active.cell = IBM としましょう。IBM にカーソルを合わせます。関連する市場データを表示するコメント ボックスがポップアップ表示されるようにしたいと思います。

$bid = "=BDP(active.cell &" US EQUITY","BID_ALL_SESSION")"
$bidsize = "=BDP(active.cell &" US EQUITY","BID_SIZE_ALL_SESSIONS_RT")"
$ask = "=BDP(active.cell &" US EQUITY","ASK_ALL_SESSION")"
$asksize = "=BDP(active.cell &" US EQUITY","ASK_SIZE_ALL_SESSIONS_RT")"
$last = "=BDP(active.cell &" US EQUITY","LAST_ALL_SESSIONS")"
$lastsize = "=BDP(active.cell &" US EQUITY","TRADE_SIZE_ALL_SESSION_RT")"

「何とか」で私はしたいです ($bidsize $bid $ask $asksize $last $lastsize)

私は周りを覗き始め、以下に何かを見つけましたが、実装方法がわかりません。何か案は？

Sub add-comments()

Dim rcell As Range

For Each rcell In Range("B2:B48")

If rcell.Value <> "" Then
rcell.AddComment

rcell.Comment.Text 'blah'
End If
Next
End Sub

ご覧いただきありがとうございます