Sub chenfa99biao()
For i = 1 To 9
For j = 1 To i
Debug.Print i & "*" & j & "=" & i * j & " ";
Next
Debug.Print
Next
End Sub
Sub chenfa99biao()
For i = 1 To 9
For j = 1 To i
Debug.Print i & "*" & j & "=" & i * j & " ";
Cells(i, j) = i & "*" & j & "=" & i * j & " "
Next
Debug.Print
Next
End Sub