VBA字典问题
可以直接把cells(1,1)加入key, 但问题是这个Key有点特殊, 造成一些理解与取值上的问题如下
Sub Test()
Dim d, dK
Set d = CreateObject(“scripting.dictionary”)
d(Cells(1, 1)) = 0
For Each dK In d.keys
Debug.Print dK.Text '结果是1
Debug.Print d(dK) ’ 结果是0
Debug.Print d(Cells(1, 1)) '似乎无效, 不能获得本应可以获得的内容
Next dK
End Sub
VBA字典问题
最新推荐文章于 2022-10-13 14:44:56 发布