本節課為VBA學習當中的第九課，excel中函數在VBA當中如何來體現以及運用。以SUM和countif為例來講解函數在VBA中運用的基礎知識及注意點：

案例一：sum求和函數使用（函數當中不需要加引號的）

效果

代碼如下：

' 不需要引號的函數使用

Sub VBAsum函數()

Dim i As Integer

For i = 2 To 10 '定義循環區間為第2-10行

Sheet1.Cells(i, 3) = "=sum(a" & i & ":b" & i & ")" '用雙引號“”將計算值以函數來體現。C2=sum(A2:b2)

Next

End Sub

注意點：與上節將的VBA公式的使用一樣，本節函數使用主要為用雙引號“”將計算值以函數來體現。從而表格中可以執行此函數。

案例二：countif&sum+indirect函數使用（函數當中需要使用到雙引號）

效果

代碼如下：

'公式需要帶引號的函數使用

Sub 公式帶引號的計算()

Cells(11, 1) = "=COUNTIF(A2:A10,"">5"")" '函數解析為=countif(A2:A10,">5"），

Cells(11, 2) = "=sum(INDIRECT(""B2:B10""))" '函數解析為=sum(indirect(B2:B10))，

End Sub

注意點：

1、函數解析為=countif(A2:A10,">5"），因為判斷區域本身就需要用到雙引號，為了避免雙引號被VBA解析，所以雙引號前后還需要加個雙引號；

2、 同上，函數解析為=sum(indirect(B2:B10))，表格中原本Indirect引用的區域不需要加雙引號，但是在VBA中還是需添加，所以得另外添加一個雙引號。