[Excel][VBA]2.認識副程式Sub與Function

2023-04-18

文、意如

續上一篇我的第一個VBA程式已經做出了我們的第一個VBA程式，接下來就要認識常用的VBA內建的功能。

任務一：建立一個新功能
任務二：認識Sub副程式
任務三：認識Function副程式
任務四：使用範圍Public與Private

首先建立一個新檔案、新的功能，直接點選開發人員 ▶ Visual Basic按鈕

在空白區按下右鍵 ▶ 插入 ▶ 模組

此時會跳出Module1，模組寫程式碼的視窗。

我們可以先修改模組名稱，方便我們更容易辨識，點選屬性 ▶ 名稱 ▶ 點擊後輸入你的新模組名稱，範例中取名叫newmodule

接下來到右邊視窗中輸入程式：

先寫一個簡單的彈窗，來測試是否可以正常的執行。

Sub test()
    '要執行的程式
    MsgBox ("hi,123")
End Sub

輸入完程式後按下上方的藍色箭頭執行

按下藍色箭頭執行後即可立即看到效果。

通常我們需要將程式寫在Sub [功能名稱]與End Sub結尾中，一組sub就代表一個巨集也就是一個功能，因此如果有兩個功能，就可以寫兩組sub。

建立第二個功能（sub）:

1. 直接在原本的程式下方再輸入一組Sub [功能名稱]與End Sub即可

Sub Hello()
    MsgBox ("Hello！！")
End Sub

2. 右上方下拉選單中選擇要執行的巨集名稱

3. 藍色按鈕執行

4. 結果顯示

VBA程式中都是由sub（副程式）與function（方法）所主成的，sub代表巨集，

在多個巨集中，有時候會使用到某些特定重複的功能，這時後就可以把這些常常會用到的重複功能寫成function（方法），

當建立巨集Sub時，有需要時就可以馬上呼叫function來執行某一段語法，不需要重新造輪子，範例如下：

1. 寫一個功能傳入價錢與數量，接下來算出總價。

Function cal(price, num)
    cal = price * num
End Function

2. 寫一個巨集呼叫功能並傳入價錢與數量，將結果顯示在彈窗中。

Sub show()
    MsgBox cal(100, 2)
End Sub

3. 選擇要執行的show()的巨集

4. 點選藍色執行按鈕

5. 彈窗顯示計算結果

流程步驟如下圖：

VBA Sub 與 Function中的範圍分成 Public與Private，只要加在Sub 與 Function前面即可。

Public與Private主要差別在於，使用 Public 時其它的模組(Module) 都可以使用，

此Sub 與 Function，但使用 Private 時只有此模組(Module) 可使用此Sub 與 Function。範例如下：

Public Function cal(price, num)
    cal = price * num
End Function

Private Sub show()
    MsgBox (cal(100, 2))
End Sub

Yiru@Studio - 關於我 - 意如

Yiru@Studio