如何用Excel VBA解析JSON数据（这个对我真的好难！）

zhangjimfu · 发表于 2015-9-6 19:26

onlycxb 发表于 2015-9-6 17:15
这是通过js代码处理数据，具体对jscript语法进行了解。

感谢onlycxb兄！空的时候我一定好好拜读jscript语法，太强大了。

zhangjimfu · 发表于 2015-9-6 19:31

coby001 发表于 2015-9-6 17:17
excel 2003 运行正常啊~

coby001兄，EXCEL2013版里有这个函数，不知道是什么原因导致不能运行。

zhangjimfu · 发表于 2015-9-6 19:35

hai167 发表于 2015-9-6 17:18
Sub bluejson() '方法二
Dim aa, y As Object
S ...

兄弟，这个我不得不佩服，帮我大忙了，谢谢！

crazy0qwer · 发表于 2015-9-6 19:55

zhangjimfu 发表于 2015-9-6 19:26
感谢onlycxb兄！空的时候我一定好好拜读jscript语法，太强大了。

用方法二要小心项目位置以及数量要保持一致，否则就会出错。
你给的例子第一个比第二个多了一个项目，但是刚好这个项目在最后，所以看起来是没有错误。

coby001 · 发表于 2015-9-6 19:58

zhangjimfu 发表于 2015-9-6 19:31
coby001兄，EXCEL2013版里有这个函数，不知道是什么原因导致不能运行。

出错信息是什么？

zhangjimfu · 发表于 2015-9-6 20:20

coby001 发表于 2015-9-6 19:58
出错信息是什么？

详见图片！

coby001 · 发表于 2015-9-6 20:32

zhangjimfu 发表于 2015-9-6 20:20
详见图片！

我在 17 楼已经说明原因了

我用的是 1 楼的 json字串
你把 1 楼的 json字串复制到 [A5] 里，试试看。

crazy0qwer · 发表于 2015-9-6 20:46

zhangjimfu 发表于 2015-9-6 20:20
详见图片！

添加监视 Y ，看是否有 1 。

zhangjimfu · 发表于 2015-9-6 21:15

coby001 发表于 2015-9-6 20:32
我在 17 楼已经说明原因了

我用的是 1 楼的 json字串

明白了，原来是字符串的问题，感谢！

coby001 · 发表于 2015-9-7 11:19

zhangjimfu 发表于 2015-9-6 21:15
明白了，原来是字符串的问题，感谢！

JSON 直写 Range，轻松完成格式转换。
http://club.excelhome.net/thread-1228149-1-1.html
(出处: ExcelHome技术论坛)

		自动登录	找回密码
密码			免费注册

[求助] 如何用Excel VBA解析JSON数据（这个对我真的好难！）