excel删除空行问题

更新时间2018-04-27 10:41:44

excel 删除空行问题

非常感谢你的帮助！在运行你给的代码的时候我已经把 js 改成 <=12 了，运行几遍后发现，只要是最后一列（L列）没有数据的行 cd 的值就是 0 ，都将被删除。怎么解决？谢谢

js=3下面添加一行 cd=0，或者变成js=3 : cd=0

cd=Len(Cells(hs,js)变成cd=cd + Len(Cells(hs,js)

这样就行了。

但是，有句话要问你：“谁给你的代码？”

这样麻烦，不赞成这种算法。

中间嵌套的Do……Loop语句完全可以去掉。