[mxjs]

用VBA吧，
Sub FillSeriesWithLeadingZeros()
Dim i As Integer
For i = 1 To 100
Cells(i, 1).Value = "固定内容" & Format(i, "000")
Next i
End Sub

按下 Alt + F11 键打开VBA编辑器，在“插入”菜单中选择“模块”来创建一个新的模块。在模块窗口中复制并粘贴上面的代码。按下 F5 键或点击运行按钮来执行宏。
需要修改1 To 100， "固定内容" & Format(i, "000")。

[mxjs]

作者: print-no

能帮帮忙录个视频 看一下吗？ 我怎么运行不了

没有过WPS，用函数吧。选中A1单元格，在上方名称框中填写A1:A10000，回车，此时将选中A1:A10000
在编辑栏中填写="固定内容" & TEXT(ROW(A1),"00000")，按Ctrl+回车，便可得到一万条递增数据1、2、3......10000

[mxjs]

作者: lvhonghui

这个方便录个视频吗

凑合着看吧，很简单的。。。。。。。。。。。