VBA小程序：分拆单元格内容并插入到N个列中

在小微经营贷进件过程中，要求传入店铺开业以来月度交易流水，在接口字段中约定以类似于[{"month": "201909", "amount": 10550}, {"month": "201908", "amount": 102757}]的形式传入，风控专员需要从该字段中拆分出每月交易流水，并且按照月份由近及远排列，从而方便监控店铺经营流水的变化趋势。 针对上述需求，用VBA来实现是再理想不过了。基本原理是定位到月度交易流水字段，并遍历每一行，调用Split()函数将字符串拆分成数组，并调用简单的交换排序确保按月份降序排列，最后将每月交易流水填入新增的列中。 使用方法：打开该宏文件，切换到目标excel文件，按ctrl+q（绑定的热键，即执行extractMonthRevenue过程）即可。 上述用绑定热键的操作方法的优点是，对目标excel文件不需要做任何变化或加工，只要有对应月交易流水字段即可（原因是vba代码中没有指定工作表，默认是ActiveSheet，即只要焦点在目标excel文件中即可）。