多语言展示
当前在线:1538今日阅读:61今日分享:18

图示EXCEL表格vba系列14之双重循环循环套循环

图示EXCEL表格vba系列14之双重循环也就是循环套循环,简单For循环套循环,若是想了解vba其它系列,可以关注会持续更新。
工具/原料
1

EXCEL2007

2

测试表格链接:https://pan.baidu.com/s/1c3OQvQC

3

密码在注意事项里面

方法/步骤
1

首先需要将格式在excel表格中设置好,以便达到自己需要的要求,如下图所示:

2

需要将循环按钮指定到模块代码中,当然也是可以新建模块的,如下图所示:

3

操作以上步骤的目的是为了,将按钮的点击事件就可以执行模块1中的代码。

方法/步骤2
1

接下来就是编写代码了,先编写一个单程循环,如下图所示:

2

然后需要定义另外一个变量后再写一个循环,这个循环是执行在另外一循环里面,如下图所示:

3

双层循环的样式很简单,也就是将循环写入另外一个循环就可以了。

方法/步骤3
1

最后在简单执行双层循环,使其能够简单显示出来,换句话说也就是显示循环的结果,如下图所示:

2

代码如下:Dim i As Integer Dim j As Integer        For i = 2 To 11        For j = 1 To 6            Sheet1.Cells(j + 1, 1) = i + j        Next j        Sheet1.Cells(i, 4) = i + j    Next i

3

点击双重循环按钮,就可以执行刚刚的代码,并将结果显示出来,如下图所示:

4

换句话说,点击按钮后,代码运行的结果就是如下图所示的结果。

注意事项
1

密码:2xup

2

如果对你有所帮助,记得投个票吧!或点赞!

3

若是仍有疑问,可以点击“我有疑问”留言,谢谢!

推荐信息