学习office，我们就可以当成是一个单机游戏。学习的office过程就是一个单机游戏的打怪升级过程。

前面几篇文章我们介绍了关于VBA的对象、对象集合、VBA的属性，具体内容可以在本头条的历史消息中查看

VBA对象：从对象开始学习VBA

VBA对象集合：VBA中的对象集合

VBA的属性：VBA对象的属性

今天我们通过一个VBA做的乘法口诀表小程序来进一步认识VBA的魅力和魔性。

如下图，为一个简单的乘法口诀表，考虑以下我们怎么通过VBA的小程序来制作？

你或许会想到用函数也可以达到这样的效果，我想问你，累不累？浪不浪费时间？

何必不通过VBA做出来，省下来的时间，你去撩妹好不好？

代码如下：

Sub 乘法口诀表()

Dim num1%, num2%

'定义变量，分别定义num1,num2两个整数型变量

For num1 = 1 To 9 Step 1

'第一个循环语句，建立9次循环，循环的步幅长为1

For num2 = 1 To 9 Step 1

'第二个循环语句，建立9次循环，循环的步幅长为1

If num2 > num1 Then

'判断语句，如果num2大于num1

Exit For

'退出语句

Else

'接上面if语句，如果num2不大于num1，则执行下面

Cells(num1, num2) = num2 & "×" & num1 & " =" & num1 * num2

'这个语句看着很长，字母很多，其实也就是给单元格赋值，Cells(num1, num2) 单元格的内容等于num2 & "×" & num1 & " =" & num1 * num2

End If

'结束if语句

Next num2

'第二个next语句的一部分

Next num1

'第一个next语句的一部分

End Sub

以上黑色字体部分就是VBA的源代码，绿色字体就是关于代码的解释。

主要用到定义变量，For next 循环语句，If判断语句。

学习VBA的重点还是在了解理论知识的基础上，亲自把代码敲一遍。

不信，你先敲完以上代码，如果还不懂，你来找我，我帮你解释。

通过下面的动图看下这个VBA运行的效果

如有疑问，可以添加：data--tech,进行询问。