エクセルVBAでクイックソート

クイックソート 基準値を配列の中から選んで基準値以上の値を配列の右へ、基準値以下は左へ寄せてから基準値の場所で配列を二分割、この処理を分割した配列それぞれで繰り返す 'vが配列、tは並び替える範囲の先頭の添字(index)、bは最後尾の添字 Sub QuickSort4(v As Variant, t As Long, b As Long) 'ピボット、基準点、…