恭喜,你发布的帖子
发布于 2017-02-13 15:10:39
13楼
方便提供下那个循环判断处理代码吗,
呃,还没写
之前帮他们做过,代码没有复制
m = ors.RecordCount
n = m / 2 '2根据你读取的变量格式更改
p = 0
o = 0
for i = 0 to m
excel.cells(i-o,p) = oRs.Fields(2).value
if i mod n = 0 then
o = o+n
p = p + 1
end if
next
大概是这个意思吧
你自己改改吧,我也正常写帖子的续呢,后面也会介绍
请填写推广理由:
分享
只看
楼主