今天再教一個 VBA 的經典案例：自動生成 99 乘法口訣表。
這個案例主要是幫助大家理解和掌握 for 循環語句的應用，代碼非常簡單。
效果：
點擊按鈕，即可生成 99 乘法口訣表。
方法：
1. 按 Alt F11 打開 VBE，輸入以下代碼：
Sub 乘法表()
Dim i As Byte, j As Byte, s As Byte '聲明變量 i,j,s
For i = 1 To 9 'i為1到9的自然數
For j = i To 9 'j為1到9的自然數
s = j * i 's為i,j相乘的結果
Cells(j, i) = i & "x" & j & "=" & s '單元格第 j 行 i 列的值為相應的乘法公式，變量和符号之間用 & 連接
Next j
Next i
End Sub
2. 回到 Excel 創建按鈕，修改文字，将其宏指定為上述“乘法表”，完成！
3. 心血來潮，我再加一段清空代碼，新建一個“清空”按鈕指定這個新宏
Sub 乘法表()
Dim i As Byte, j As Byte, s As Byte '聲明變量 i,j,s
For i = 1 To 9 'i為1到9的自然數
For j = i To 9 'j為1到9的自然數
s = j * i 's為i,j相乘的結果
Cells(j, i) = i & "x" & j & "=" & s '單元格第 j 行 i 列的值為相應的乘法公式，變量和符号之間用 & 連接
Next j
Next i
End Sub
Sub 清空()
Range("A1:I9").Clear
End Sub
更多精彩资讯请关注tft每日頭條，我们将持续为您更新最新资讯!
zpostcode 
Recruit 
weather 
mreligion 
Yellowpages 
sport 
constellation 
shopping 
name 
game 
directory 
literature 
Word 
tour 
furnish 
Lottery 
tftnews 
lyrics 
News 
digital 
car 
dir 
Edu 
Finance 
