Excel VBA求助，字典与数组转换的问题
1个回答
展开全部
没有直接的一个语句完成数组与字典的转换，只有循环复制，例如：
'数组转换为字典
set db=createobject("scripting.dictionary")
arr=range("a1:b:100")
for i=1 to 100
db(arr(i,1))=db(arr(i,1))+arr(i,2)
next i
'自动转换为数组
for each k in db.keys
arr(i,1)=k
arr(i,2)=db(k)
next k
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
