条件：E列(除E1标题)有四位以下数。如：有四位、有三位、有二位、有一位
要求：E列四位的保持不变，不足四位的补足四位，其结果在原位。如123的补为0123、23的补为0023，循环至E列为空。谢谢!
求助一段VBA代码(补位)
答案:1 悬赏:0
解决时间 2021-11-11 18:50
- 提问者网友：纹身骑士
- 2021-11-10 21:03
最佳答案
- 二级知识专家网友：飘零作归宿
- 2021-11-10 22:21
用下面代码
Sub 补位()
For i = 2 To [e65536].End(xlUp).Row
Cells(i, 5) = "'" & Right("000" & Cells(i, 5), 4)
Next
End Sub
Sub 补位()
For i = 2 To [e65536].End(xlUp).Row
Cells(i, 5) = "'" & Right("000" & Cells(i, 5), 4)
Next
End Sub
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯