學校老師在教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
[插入一個圖片,然後指定巨集]
回到活頁簿,插入一個圖形,於圖形上按右鍵 [指定巨集] ,選取剛剛建立好的模組,按下確定
[按下剛剛的執行紐,即可執行]
文章標籤
全站熱搜
留言列表