VBA 將字串改為函數~~有這樣的指令嗎?

vba excel vba

eva09qq 2018-09-21 19:07:36 ‧ 5247 瀏覽

分享至

各位前輩好~~以下小段的VBA 指令
有個部份的使用方法比較特別
已經查過很多文章似乎都沒有人討論過
在此請教看有沒有能幫忙

A1 = "09:00"
A2 = "10:00"
B = "A1"
C = CStr(B)

我的目地是 C的內容是要 "09:00"
但是 B是用字串是算出來的
B是變數
用過 C = CStr(B) 或是 C = CVar(B)
都不行有前輩能點解一下?

paicheng0111 iT邦大師 5 級 ‧ 2018-09-21 22:06:45 檢舉

VBA指令？我沒有看到Sub、Function或Dim。

eva09qq iT邦新手 5 級 ‧ 2018-09-22 08:02:49 檢舉

pcw 大大 vba 可以不用dim
然後這個就是簡單寫
比較重要的內容部份而已
所以 sub function 就省略了
功能有出來比較重要，感謝您的熱心

登入發表討論

直播研討會

{{ item.channelVendor }} {{ item.webinarstarted }} |

直播中

2 個回答

marlin12

iT邦研究生 5 級 ‧ 2018-09-21 21:38:37

最佳解答

VBA是不支援dynamic variable name，但是可以用dictionary物件來模擬的。

Dim dict
Set dict = CreateObject("Scripting.Dictionary")
dict("A1") = "09:00"
dict("A2") = "10:00"

Dim B, C As String
B = "A1"

C = dict(B)
Debug.Print "C = " & C      ' result "C = 09:00"

dict("A1") = "20:00"

C = dict(B)
Debug.Print "C = " & C      ' result "C = 20:00"