VBA~WorksheetFunction.Mode_Multメソッド~Excel
VBAで指定した範囲内におい最も頻繁に出現する値を求めたい場合はWorksheetFunction.Mode_Multメソッドを使います。
書き方
WorksheetFunction.Mode_Mult(数値 1,[数値 2],...)
例として下の画像において下のコードを実行するとセルD1にセルA1からセルA10の範囲の中で最も頻繁に出現する値が表示されます。今回は1が最も頻繁に出現する値なので1が表示されます。
Sub test1() Range("D1") = WorksheetFunction.Mode_Mult(Range("A1:A10")) End Sub