Win7 Excel VBA 自動產生九九乘法表圖文教學

利用 Excel 內建 VBA（Visual Basic for Applications）巨集，幾秒鐘即可在工作表自動產生完整九九乘法表，避免手動輸入錯誤與耗時。本文提供完整程式碼與操作步驟。

操作步驟

1. 開啟 Excel → Alt+F11 開啟 VBE 編輯器。
2. 「插入」→「模組」→ 貼上以下程式碼：

Sub 乘法口訣表()
    Dim i As Integer, j As Integer
    Columns("A:I").ColumnWidth = 15  ' 設定欄寬容納完整算式
    For i = 1 To 9
        For j = 1 To i
            Cells(i, j).Value = i & "×" & j & "=" & (i * j)
        Next j
    Next i
End Sub

3. 關閉 VBE 回到 Excel → Alt+F8 開啟巨集清單 → 選「乘法口訣表」→ 「執行」。
4. A1:I9 區域即產生完整乘法表（第 1 列 1 條、第 9 列 9 條）。

程式碼解析

• Columns("A:I").ColumnWidth = 15：預設欄寬過窄會顯示 ###，預先調寬。
• 外層 i = 1 To 9：控制列數（1~9 列）。
• 內層 j = 1 To i：控制每列欄數（第 i 列有 i 條算式）。
• Cells(i, j)：對應第 i 列第 j 欄儲存格。
• 字串串接 i & "×" & j & "=" & (i * j) 產生如「3×4=12」格式。

延伸應用

修改迴圈範圍可產生任意大小乘法表；結合條件格式可標記倍數、質數等教學應用。