なぜVBAで関数を使う必要があるのか？
実務において、Excelの「関数」は非常に強力な武器です。しかし、VBAで自動化を行っている際、「わざわざセルに数式を入力しなくても、VBAの中で計算結果だけを取得したい」というシーンは非常に多いです。
VBAからExcelの関数（SUMやAVERAGEなど）を呼び出すことで、複雑な数式をセルに残すことなく、計算結果だけをスマートに変数へ格納することができます。これにより、シート上の見た目をスッキリさせつつ、高度なデータ集計が可能になります。
基礎知識：WorksheetFunctionとは
VBAでExcelのワークシート関数を利用するには、WorksheetFunctionオブジェクトを使用します。
仕組みは非常にシンプルです。「Application.WorksheetFunction.関数名」と記述することで、Excelの標準関数をVBA内で実行できます。例えば、合計を求めるSUM関数なら「Application.WorksheetFunction.Sum(範囲)」となります。
注意点として、VBAの関数（例：Sqr関数など）とExcelのワークシート関数（例：Sum関数など）は名前が同じでも別物です。混乱を避けるためにも、シート上の関数を使う際は必ず「WorksheetFunction」を明示する癖をつけましょう。
実装：VBAで関数を呼び出す手順
1. 計算対象のデータ範囲をRangeオブジェクトとして指定する。
2. WorksheetFunctionオブジェクト経由で計算処理を行う。
3. 戻り値を変数に代入して活用する。
サンプルプログラム：範囲内の合計と平均を算出する
以下のコードは、アクティブシートのC4からE4の範囲を対象に、合計と平均をVBA内で計算し、メッセージボックスで表示する実用的なサンプルです。
Sub CalculateWithVBA()
Dim ws As Worksheet
Dim targetRange As Range
Dim totalValue As Double
Dim averageValue As Double
‘ 対象のワークシートと範囲を設定
Set ws = ActiveSheet
Set targetRange = ws.Range(“C4:E4”)
‘ WorksheetFunctionを使用して合計と平均を算出
‘ セルに数式を書き込まずに計算結果のみを取得できるため効率的です
totalValue = Application.WorksheetFunction.Sum(targetRange)
averageValue = Application.WorksheetFunction.Average(targetRange)
‘ 結果を出力
MsgBox “合計値: ” & totalValue & vbCrLf & _
“平均値: ” & averageValue
End Sub
応用・注意点：現場で陥りやすい罠
1. エラー値の扱い
WorksheetFunctionを使用する場合、対象範囲にエラー値（#DIV/0!など）が含まれていると、VBA側で実行時エラーが発生してプログラムが停止します。実務では、あらかじめ計算対象の範囲にデータが入っているか、エラーがないかを確認する処理を挟むのが安全です。
2. 大量データの計算
セルに数式を大量に埋め込むよりも、WorksheetFunctionで計算して値だけを書き込む方が、ブックの容量を抑えられ、動作も軽快になります。計算結果が固定値で良い場合は、ぜひこの手法を採用してください。
3. 補足
「Application.WorksheetFunction」の「WorksheetFunction」の部分は省略可能な場合もありますが、記述した方が可読性が高く、VBAの独自関数との区別もつくため、明示的に記述することを強くおすすめします。
