1、首先打开wps 开发工具
2、点击vb编辑器
3、鼠标右键新建模块
4、点击插入命令
5、选择模块命令
6、在右侧输入以下代码Sub gyz()Dim i As IntegerFor i = 1 To 100Range("a" & i) = 1NextEnd Sub
7、点击运行看看结果
8、A1-A100单元格自动填写数字1
1、首先打开wps 开发工具
2、点击vb编辑器
3、鼠标右键新建模块
4、点击插入命令
5、选择模块命令
6、在右侧输入以下代码Sub gyz()Dim i As IntegerFor i = 1 To 100Range("a" & i) = 1NextEnd Sub
7、点击运行看看结果
8、A1-A100单元格自动填写数字1