生成一段VBA代码,产生九九乘法表
Sub MultiplicationTable()
Dim i As Integer, j As Integer
For i = 1 To 9 '行
For j = 1 To 9 '列
Cells(i, j).Value = i * j '将乘积赋值给单元格
Next j
Next i
End Sub
免责声明:
以上内容除特别注明外均来源于网友提问,创作工场回答,未经许可,严谨转载。