Sub 制作乘法口诀表1()
Dim i, j, i1, j1%
For i = 1 To 20
i1 = i + 3
For j = 1 To 20
j1 = j + 1
Cells(i1, j1) = j & "×" & i & "=" & i * j
Next j
Next i
End Sub
用vba做了一个大99乘法口诀表,分享给大家。
最新推荐文章于 2024-03-20 11:13:49 发布
本文介绍了一段VBA代码,展示了如何在Excel中通过For循环实现乘法口诀表的生成,从1到20的数列,每行对应一个数,列上是该数与1到20的乘积。
摘要由CSDN通过智能技术生成