如何用excel的VBA进行循环操作,计算一个

如题所述

简单九九乘法表VBA示例:

Sub ä¹ä¹ä¹˜æ³•è¡¨()
    Dim num1, num2 As Integer
    On Error Resume Next
    For num1 = 1 To 9
        For num2 = 1 To 9
            If num2 > num1 Then
            Exit For
            Chr (10)
            Else
            Cells(num1, num2) = num1 & "×" & num2 & "=" & num1 * num2
            End If
        Next num2
    Next num1
End Sub

温馨提示:答案为网友推荐,仅供参考
相似回答