導入
ビジネスにおいて「来月の売上目標」や「必要な仕入れ数」を決定する際、勘や経験だけに頼っていませんか？過去のデータに基づいた科学的な予測は、在庫ロスを減らし、利益を最大化するために不可欠です。Excelには、過去の傾向から未来を予測する強力な統計関数「FORECAST関数」や「TREND関数」が備わっています。今回は、これらの関数を使ってデータドリブンな予測を行うための基礎知識と、VBAでの活用を見据えた実装方法を解説します。
基礎知識
予測に使用する「FORECAST関数」と「TREND関数」は、どちらも回帰分析という手法を用いています。
・FORECAST関数：既知のデータから線形回帰式を求め、指定したXの値に対する予測値（Y）を算出します。
・TREND関数：FORECASTと似ていますが、複数のデータセットを扱い、より柔軟に予測値を算出することが可能です。
これらは、散布図を描いた時に引ける「近似曲線」を数式化したものと考えると分かりやすいでしょう。
実装/解決策
実務で予測を行う際は、まず「独立変数（気温や販促費など、予測の根拠となる数値）」と「従属変数（売上数など、予測したい数値）」のセットを準備します。
Excelシート上に過去のデータを並べ、関数を入力することで、未知の変数に対する予測値を自動で算出できます。VBAで扱う場合は、これらの数式をセルに代入するか、WorksheetFunctionオブジェクト経由で直接算出結果を取得するのが定石です。
サンプルプログラム
以下のコードは、VBAを使ってセルに予測式を自動入力し、計算結果を出すためのサンプルです。
Sub CalculateForecast()
‘ A列に気温、B列に売上データが10行目まで入っていると仮定
‘ 新しい気温（20度）に対する売上予測をセルC1に出力する
Dim ws As Worksheet
Set ws = ThisWorkbook.Sheets(1)
‘ FORECAST関数の構文：FORECAST(予測対象のX, 既知のY範囲, 既知のX範囲)
‘ 20度という気温に対し、過去の売上(B1:B10)と気温(A1:A10)から予測
With ws.Range(“C1”)
.Formula = “=FORECAST(20, B1:B10, A1:A10)”
.NumberFormatLocal = “#,
0″ ‘ 整数で見やすく表示
End With
MsgBox “予測値の算出が完了しました。”
End Sub
応用・注意点
実務で予測関数を使う際に最も注意すべき点は、「データの質」です。
1. 相関関係の確認：気温と売上の間に明確な関連性がない場合、予測値は無意味になります。事前に散布図を作成し、データが右肩上がりや右肩下がりの傾向にあるか確認してください。
2. 外れ値の除外：異常に売上が高い日（イベント日など）が含まれていると、予測の精度が著しく低下します。分析対象から除外する工夫が必要です。
3. 将来予測の限界：これらの関数はあくまで「過去の傾向が将来も続く」という前提に基づいています。市場環境の変化が激しい場合、統計値だけで判断せず、定性的な判断を組み合わせることをお勧めします。
