编写程序输出九九乘法表

打开表格，在表格内横向和纵向分别输入1到9，进入VBA窗口，编写代码后执行，生成九九乘法表。

工具/原料

• 机械革命S3 Pro

• Windows10

• Excel2019

方法/步骤

1. 1

   打开表格

   打开EXCEL表格，在B2到J2单元格内输入数字1-9。

   

2. 2

   输入数字

3. 
   

4. 在A2到A10单元格内输入数字1-9。

   

5. 3

6. 
   

7. 
   

8. 进入VBA窗口

   在键盘上按下ALT+F11，进入VBA窗口，插入一个新的模块。

   

9. 4

10. 
    

11. 
    

12. 输入代码

    在模块里输入代码。

    Public Sub 九九乘法表()

    Dim i, j

    For i = 1 To 9 

    For j = 1 To 9 

    If i >= j Then Cells(i + 1, j + 1) = i & "x" & j & "=" & i * j 

    Next j 

    Next i 

    End Sub 

    

13. 5

14. 
    

15. 
    

16. 运行程序

    点击运行后返回到EXCEL表格，九九乘法表制作完成。