1、功能：用for ...next实现九九乘法表。1、初始数据为空；
2、在外狒芙梨VBE中编写代码；Sub ForEach99()Dim a%, b%For a = 1 To 9 For b = 1 To 9 If b > a Then Sheet3.Cells(a, b) = "" Else Sheet3.Cells(a, b) = a & "*" & b & "=" & a * b End If NextNextEnd Sub
3、设置炝里谧艮断点，并按F8可以进行调试，在调试过程中，打开本地窗口，可以查看到变量的值的变化情况；4、打开Excel界面，随着调试工作的进行，相应地，Excel表格的数据也在逐步发生变化。
4、点击插入--形状，选择一个圆形形状；
5、在刚刚选择的形状中右键，点击指定宏，指定刚刚定义的宏ForEach99，并点击确定。
6、运行宏，得到如下运行结果，即9*9九九乘法表。
7、综上所述，利用for....next可以实现99乘法表的功能。