VBA问题，请大侠帮忙

更新时间2019-01-17 20:23:38

VBA 运行Cells(m, 2) = Split(Split(s, ""p":"")(1), ".")(0) 提示缺少列表分隔符

改为：Cells(m, 2) = Split(Split(s, Chr(34) + "p" + Chr(34) + ":" + Chr(34))(1), ".")(0)