原始问题:
生成一段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
生成一段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
Prev:巴奴毛肚火锅企业文化精神层的解决方案