3/20vba九九乘法表

Private Sub CommandButton1_Click()

For i = 1 To 9

For j = 1 To 9

Cells(i, j) = i * j

Next

Next

End Sub