學校老師在教FOR迴圈時，有時會請大家寫九九乘法表，而九九乘法表有很多種撰寫法ㄈ，所以這邊會分幾個單元持續介紹。

這邊就來分享一下九九乘法表的程式撰寫。

[被乘數、乘數、答案在同一儲存格]

 

[插入模組]

 

[撰寫程式碼]

Sub NXN()

Range("A1").Select ‘資料的起始的位置，本範例為資料起始位置為儲存格A1

For X = 1 To 9 ‘欄數，因為我們是九九乘法表，所以有九欄

For Y = 1 To 9 ‘列數，因為我們是九九乘法表，所以有九列

ActiveCell(Y, X) = X & "*" & Y & "=" & X * Y ‘該行程式回隨FOR迴圈進行資料帶入

Next Y ‘跳下一列

Next X ‘跳下一欄

End Sub

 

[插入一個圖片，然後指定巨集]

回到活頁簿，插入一個圖形，於圖形上按右鍵 [指定巨集] ，選取剛剛建立好的模組，按下確定

 

 

[按下剛剛的執行紐，即可執行]


arrow
arrow
    文章標籤
    vba 迴圈 for excel 九九乘法 乘數 被乘數 乘積
    全站熱搜

    黑天使 發表在 痞客邦 留言(0) 人氣()

    E-mail轉寄