怎么实现excel中用vba添加1to1000000的序列号,请大神指教一下

发布网友发布时间：2023-03-30 16:45

共3个回答

热心网友时间：2023-11-04 10:21

比如在A列可以用以下代码

Sub sssss()

For i = 1 To 1000000

Cells(i, 1) = i

End Sub

或者，先在A1单元格填1，再自自动填充，这种方法快很多

热心网友时间：2023-11-04 10:22

我也来凑个热闹。

你没要求序列号添加在哪里，反正就添加在单元格里。下面的代码一定行，2003版的都行，以附件为证。

Sub ABC()

Application.ScreenUpdating = False

For i = 1 To 1000000

Cells(i) = i

Application.ScreenUpdating = True

End Sub

热心网友时间：2023-11-04 10:22

不可能，因为excel最多只支持65536行

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com