尧图网络 高端网站定制 · 原创设计
免费咨询热线
400-888-6620
免费获取方案
VBA 解析 JSON 总报错?一个 JsonConverter.bas 跑通解析与生成
VBA 解析 JSON 总报错一个 JsonConverter.bas 跑通解析与生成【免费下载链接】VBA-JSONJSON conversion and parsing for VBA项目地址: https://gitcode.com/gh_mirrors/vb/VBA-JSON把天气接口返回的 JSON 填进 Excel我手写的 InStr 解析在第二层数组就崩了只报了一句 Run-time error 13。VBA-JSON 就是干这个的单文件 VBA JSON 解析库Excel、Access 通吃。本文带你装好它跑通第一个完整例子。为什么手写解析撑不住嵌套结构手撕 JSON 撑不住原因很实在结构不可控而每一层嵌套、每个转义都得自己兜底。手写 InStr/Mid每多一层嵌套就多写一套定位逻辑转义\、换行漏一个边界直接 Type mismatch老 VBA 环境连 Dictionary 都要手动引用clone 后三步导入平台差异一张表git clone https://gitcode.com/gh_mirrors/vb/VBA-JSONAltF11打开 VBA 编辑器工程上右键 → Import File选仓库根目录的JsonConverter.bas再补上按系统区分的一步系统要补的依赖仅 Windows工具 → 引用勾选 Microsoft Scripting RuntimeWindows Mac 通吃引入 VBA-Dictionary 项目的Dictionary.cls为什么要这一步ParseJson返回的结果底层就是Dictionary对象和Collection数组没有它们解析出来的东西没地方放。编译一次不报错环境就齐了。从解析到输出的最小闭环 解析对象变 Dictionary数组变 Collection Dim json As Object Set json JsonConverter.ParseJson({a:123,b:[1,2,3],c:{d:456}}) 取值按层剥洋葱 Debug.Print json(a) 123 Debug.Print json(b)(2) 2数组下标从 1 开始 Debug.Print json(c)(d) 456嵌套对象 改数据再转回 JSON 字符串 json(c)(e) 789 Debug.Print JsonConverter.ConvertToJson(json) 紧凑格式 Debug.Print JsonConverter.ConvertToJson(json, Whitespace:2) 缩进 2 格预期输出123 2 456 {a:123,b:[1,2,3],c:{d:456,e:789}}最后一行是带缩进的多行结构层级一眼看清。输入不合法时抛出错误码10001报错信息会直接指向卡住的字符位置排查不盲目。⚠️15 位数字精度陷阱VBA 的 Double 只保 15 位有效数字身份证号、卡号按数字解析会被悄悄截断。VBA-JSON 的默认行为是超过 15 位的纯数字一律按 String 返回需要数字类型才显式开关 未加引号的 18 位数字默认按 String 返回 Dim r As Object Set r JsonConverter.ParseJson([12345678901234567890]) Debug.Print TypeName(r(1)) String精度不丢 确实需要 Double 才打开会丢精度 JsonConverter.JsonOptions.UseDoubleForLargeNumbers True跑官方测试再看进阶用法仓库里的specs/Specs.bas写了几十组断言嵌套数组、转义单引号、null值、日期自动转 ISO 格式。打开specs/VBA-JSON - Specs.xlsm跑一遍能看到作者怎么给一个上千行的单文件库做回归测试。README 里还有个进阶例子读取.json文件直接写入工作表仅 Windows。你下一步可以做的事把你自己的接口返回塞进那个例子数据直接进表。【免费下载链接】VBA-JSONJSON conversion and parsing for VBA项目地址: https://gitcode.com/gh_mirrors/vb/VBA-JSON创作声明:本文部分内容由AI辅助生成(AIGC),仅供参考
RELATED

相关推荐

LabVIEW FPGA模拟I/O:从信号链重建到硬件级调试

LabVIEW FPGA模拟I/O:从信号链重建到硬件级调试

1. 这不是“接线拖控件”就能跑通的模拟通道——LabVIEW FPGA里模拟输入输出的真实门槛很多人第一次打开LabVIEW FPGA模块,看到“Analog Input”和“Analog Output”两个VI图标时,下意识觉得:“不就是DAQmx里那套逻辑搬过来?选个通…

📅 2026/11/4 14:59:51
ROS机械臂三维仿真:Gazebo+URDF+MoveIt!工业级建模仿真全链路

ROS机械臂三维仿真:Gazebo+URDF+MoveIt!工业级建模仿真全链路

1. 项目概述:为什么“ROS机械臂三维仿真”是入门机器人开发绕不开的第一道硬门槛我带过十几届自动化、机器人工程方向的毕业设计,也帮不少嵌入式转行的朋友搭建过第一个能动的机械臂系统。几乎所有人——无论有没有C基础、有没有Linux经验——在真正跑通…

📅 2026/10/31 8:28:20
数据分析师必学:从零到实战的SQL系统学习路线全攻略

数据分析师必学:从零到实战的SQL系统学习路线全攻略

这是一篇关于数据分析方向系统学习 SQL 的完整教程,语言清晰、结构完整,全文超过 6000 字,包含环境搭建、SQL 核心语法、数据清洗实战、项目案例、性能优化、常见面试题等模块,可直接用于 CSDN 技术博客发布。1. 为什么数据分析师…

📅 2026/11/14 15:57:45
MORE NEWS

更多资讯

📰

工地太忙根本没时间复习考试?水电工证哪里考怎么考含金量全解析

工地太忙根本没时间复习考试?水电工证哪里考怎么考含金量全解析 工地太忙根本没时间复习考试?很多人在一线施工时,手里拿着水电工证却没时间准备考试,等真正需要考证时,才知道证件的 含金量 不容忽视。今天就从濮阳公路工程从业者的视角,聊聊…

📰

仁寿县报名考电工证值不值得考?学历不高也能上手

仁寿县报名考电工证值不值得考?学历不高也能上手 你是不是也担心自己学历不高,连报名都够不着?别急,电工证这个门槛其实没你想得那么高。在仁寿县,报名考电工证其实是个 实打实的蓝海机会…

📰

宜阳县电工证通过率揭秘:特种作业证怎么考才靠谱

宜阳县电工证通过率揭秘:特种作业证怎么考才靠谱 你是不是正被“ 急需特种作业证才能上岗找工作 ”这个问题困扰?别急,宜阳县电工证的通过率其实不是天堑,只要方法对, 通过率揭秘…

📰

色弱可以拿电工证吗多少钱报名靠谱吗

色弱可以拿电工证吗多少钱报名靠谱吗 学历不高怕报不上名,尤其是像我这样从事水利工程的朋友,想考个电工证,但又担心色弱会影响报考,还怕费用太高,不知道到底值不值得。别担心,下面这些内容帮你解决所有疑惑。 色弱可以拿电工证吗?视力要求是关键…

📰

普洱电工证换证之前考的证在外省能不能转过来值不值得考

普洱电工证换证之前考的证在外省能不能转过来值不值得考 之前考的证在外省能不能转过来?这是很多从事电工工作的朋友们在考虑换证时最关心的问题。尤其是在普洱这样的地方,电工证如果到期了,不及时换证不仅影响日常工作,还可能面临严重的法律责任。那么,…

📰

无锡报考电工证实操考试怕挂科?考前押题帮你稳过

无锡报考电工证实操考试怕挂科?考前押题帮你稳过 实操考试心里没底怕挂科,这几乎是每个准备报考无锡电工证的朋友的真实写照。尤其是对于在一线工作的电工,不仅要面对理论考试的压力,更担心实操考试时手忙脚乱,导致白白浪费时间和精力。其实,只要提前掌…

TODAY

今日更新

THIS WEEK

本周精选

THIS MONTH

本月热门

读完文章,想聊聊您的网站?

告诉我们您的行业与需求,资深顾问一对一梳理方案与报价,全程免费。

📞 💬