用VBA制作九九乘法表

1、在工作表中，点击菜单栏晃爬【开发工具】，在其工具栏内，点击【visual basic】!

2、会进入VBA编辑界面！点击工具栏内【插入用户窗体】按钮，在其下拉菜单中，选择【模块】！

3、会弹出模块编辑窗口，在其窗口中彩伐输入如下代码：

Sub 九九乘法表制作1()

Dim a!, b!

For a = 1 To 9

  For b = 1 To 9

    If b > a Then

    Sheet7.Cells(a, b) = ""

    Else

    Sheet7.Cells(a, b) = b & "×" & a & "=" & a * b

    End If

  Next

Next

End Sub

4、在VBA界面，同时按下CTRL+F11，返回工作表。在工作表界面，点击【开发工具】菜单下的【插入】，选择一【表单按钮】，在空白单元格处，拉出一【按钮】，在同时弹出的【指定宏】窗口，选取编辑的代码，点击【确定】。

5、将按钮重命名为【乘法表】！

6、点击【乘法表】按钮，九宿霜联九乘法表，瞬间OK！