在 Excel VBA 中,Sub 是「子程序」(Subroutine)的縮寫,是一種用來執行特定任務的程式塊。子程序不會返回值,主要用於執行一系列操作,比如自動化任務、處理數據或與用戶互動。
基本語法
Sub SubName()
' 你的代碼在這裡
End Sub
SubName是你自定義的子程序名稱,應該遵循命名規則(如以字母開頭,不包含空格)。
使用 Sub 的方法
-
創建子程序:
在 VBA 編輯器中,插入一個新的模組,然後編寫你的子程序。 -
運行子程序:
可以直接在 VBA 編輯器中選擇子程序並按 F5 鍵來運行它,也可以在 Excel 中創建按鈕來調用它。
例子
1. 簡單的消息框
Sub ShowMessage()
MsgBox "Hello, World!"
End Sub
- 這個子程序會顯示一個消息框,內容為 "Hello, World!"。
2. 修改單元格的值
Sub ChangeCellValue()
Range("A1").Value = "New Value"
End Sub
- 這個子程序會將 A1 單元格的值更改為 "New Value"。
3. 使用參數的子程序
Sub GreetUser(userName As String)
MsgBox "Hello, " & userName & "!"
End Sub
- 這個子程序接受一個參數
userName,並顯示一個歡迎消息。調用示例:GreetUser "Alice"
4. 迴圈操作
Sub MultiplyValues()
Dim i As Integer
For i = 1 To 10
Cells(i, 1).Value = i * 2 ' 將 A 列的前 10 個單元格設置為 2 的倍數
Next i
End Sub
- 這個子程序將 A1 到 A10 的值設置為 2 到 20 的倍數。
5. 條件判斷
Sub CheckScore()
Dim score As Integer
score = Range("A1").Value
If score >= 60 Then
MsgBox "通過"
Else
MsgBox "不通過"
End If
End Sub
- 這個子程序根據 A1 單元格的值判斷學生是否通過,並顯示相應的消息。
小結
Sub 是 Excel VBA 中一個非常重要的概念,用來定義可重用的程式碼塊。通過學習如何創建和使用子程序,你可以更有效地自動化 Excel 任務,簡化工作流程。隨著經驗的增長,你可以開始使用更複雜的邏輯、參數和錯誤處理來增強你的 VBA 程式碼。


0 留言