EXCEL 根据列的内容自动加入分隔符,请高手指点!

zy22785311 2014-11-06 02:33:19
A列编号
51182110820001000101
51182110820001000102
51182110820001000201
51182110820001000801
51182110820001000903
51182110820001001001
51182110820001001101
51182110820001001702
51182110820001001902
51182110820001002001
51182110820001002103
51182110820001002302
51182110820001002903
让CXCEL根据A列编号51182110820001000101中后面的5位数00101以(001)01括号里的数字为依据加入分隔符。如001-009在51182110820001000901这一行加一个分隔符,以此类推在010-019这几行中019行加一个分隔符,020-029在029行加一个分隔符,这样就可以分段打印了!请高手帮忙!谢谢了!
...全文
1141 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
X-i-n 2014-11-12
  • 打赏
  • 举报
回复
三句话
for i = 1 to usedrange.rows.count-1
  if mid(cells(i,1),15,3)<>mid(cells(i+1,1),15,3) then cells(i,1).borders(xledgebuttom).linestyle=xlcontinuous
next
xiaodeerdeer 2014-11-07
  • 打赏
  • 举报
回复
你所说的加分割符是单元格下面加一行线吗 是不是可以对后面的第三位上的数字进行判断呢啊 if left(xxx,3) = ''9'' then '处理 endif

5,138

社区成员

发帖
与我相关
我的任务
社区描述
其他开发语言 Office开发/ VBA
社区管理员
  • Office开发/ VBA社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧