表示

質問

以下のようにＡ列の数字をＢ列（記号、文字も含む）に入れ、表示させるためにはどのようなＶＢＡにすればいいですか？

　　 Ａ　　　　Ｂ
(1) 1234　　 =RSS|'ここにＡ列の数字.T'!銘柄名称
(2) 1424 　　=RSS|'ここにＡ列の数字.T'!銘柄名称
(3)　3534　　=RSS|'3534'!銘柄名称

回答No.1

KenKen_SP · ベストアンサー

こんにちは。KenKen_SP です。

こんな感じでループさせれば良いのでは?

Dim strCODE As String

strCODE = "1234"
With Cells(1, "A")
　　.NumberFormatLocal = "@"
　　.Value = strCODE
End With
Cells(1, "B").Formula = "=RSS|'" & strCODE & ".T'!銘柄名称"

お礼

KenKen_SPさんありがとうございました。