多语言展示
当前在线:1895今日阅读:2今日分享:38

图示EXCEL表格vba系列17之循环加判断语句简介

图示EXCEL表格vba系列17之循环加判断语句简介,判断语句加入到循环中,若是想了解其他的系列可以查看或者关注。
工具/原料
1

EXCEL表格2007

2

表格链接:https://pan.baidu.com/s/1o92Ry4M

3

密码在注意事项里

方法/步骤
1

首先需要将EXCEL表格中的格式写好,写出自己需要的格式,以便可以达到自己需要的要求,如下图所示:

2

将循环加判断的按钮指定到模块中,点击按钮后就可以执行模块中代码,如下图所示:

3

通过以上的操作步骤,就可以将按钮事件指定代码,实现代码的运行。

方法/步骤2
1

接下来需要写出一个简单的循环框架,如下图所示:

2

然后再循环代码中,加入判断语句,如下图所示:

3

代码如下:Dim i As Integer    For i = 2 To 11        If Sheet1.Range('A2') > 10 Then            Sheet1.Cells(i, 3) = i + 10        End If        If Sheet1.Range('A2') < 10 Then            Sheet1.Cells(i, 3) = i        End If    Next i

方法/步骤3
1

最后通过以上操作步骤,就可以实现循环加判断,对于代码运行的结果,如下图所示(单元格A2中数值大于10的结果):

2

单元格A2中数值小于10的结果,如下图所示:

3

简介,对于以上代码的说明是单元格A2中的数值大于10,循环的结果就要加上10并显示结果,单元格数值小于10,循环结果就是单纯的循环从2到11的结果。

注意事项
1

密码:z2hd

2

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

3

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

推荐信息