OfficeType

VBA~WorksheetFunction.Medianメソッド~Excel

VBAで指定した範囲内の中央値を求めたい場合はWorksheetFunction.Medianメソッドを使います。

書き方

WorksheetFunction.Median(数値1,[数値2],...)

例として下の画像において下のコードを実行するとセルC2にセルA2からセルA4の範囲の中で中央値が表示されます。今回は2が中央値なので2が表示されます。範囲が連続でない場合はコンマ区切りで複数の範囲を指定します。

image-01

Sub test1()

Range("C2") = WorksheetFunction.Median(Range("A2:A4"))

End Sub

image-02