excel表里怎么可以 从000000到999999 使用宏编写visual basic

2024-12-21 19:30:24
推荐回答(2个)
回答1:

是分别在单元格里顺序输入从000000到999999 数字?保持六位的宽度 000001,000002......999999 这样的?
从第几行开始输入,到第几行结束?是先输入行(先横向输入-)还是先输入列(竖向).?
说下你的excel版本.

回答2:

excel表只有65536行,所以想要在一行里写完所有数比较困难,此外,excel对于数字文本会自动作为数字处理,所以要先把生成的列格式设置为文本。

代码如下:
Sub Macro2()
For I = 1 To 65536
Range("A" & I).FormulaR1C1 = CStr(String(6 - Len(I), "0") & I)
Next I
End Sub