用VBA制作九九乘法表

时间:2024-10-12 22:15:36

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

用VBA制作九九乘法表

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

用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 NextNextEnd Sub

用VBA制作九九乘法表

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

用VBA制作九九乘法表

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

用VBA制作九九乘法表

6、点击【乘法表】按钮,九九乘法表,瞬间OK!

用VBA制作九九乘法表
© 手抄报圈