配列をExcelの標準機能を使って並べ替える

この関数について
関数コピペ　～コードをクリックするだけでコピー完了！～
使い方　①引数
使い方　②戻り値
サンプルコード（クリックでコピー）
【結果】配列を並び替えることができました

この関数について

配列（特に2次元）の並び替えをいかに早く実行するかはプログラマにとって共通の課題です。ExcelVBA（マクロ）においてもデータ数が数万・数十万と増えるにつれて、シートやセル上だけでデータを加工することに速度の限界を感じて配列を採用した人は多いかと思います。たしかに配列はセルと比較してデータの代入・取得の速度は段違いの早さです。しかし「並べ替え」についてはExcelの標準機能に速度の優位性があります。この関数では配列をいったん仮のシートに貼り付け、並べ替えを実施した後、配列に格納し直します。

関数コピペ　～コードをクリックするだけでコピー完了！～

F0000059_配列をExcelの標準機能を使って並べ替える

使い方　①引数

引数名	型	参照	省略	内容
target_2dim_array	Variant	ByRef	不可	並び替えを実施したい「2次元」配列を指定します。
key_index	Long	ByVal	可	並び替えのキーにする添え字（インデックス）を指定します。指定しない場合、配列2次元目の最小のインデックスが指定されたものとみなします。
header_sort	Boolean	ByVal	可	配列の１レコード目を並び替えに含めるか否かを指定します。True・・含める、False・・含めない。省略した場合は、Trueとみなします。
ascending_order	Boolean	ByVal	可	True・・昇順、False・・降順
var_type_code	VbVarType	Byval	可	配列の型を指定します。指定できる型は「CastArrayVariantToAnyting」を参照

使い方　②戻り値

状態	型	内容
正常	Variant	並べ替えを実施した配列をvar_type_codeで指定した型の配列へ変換して返します。
例外	Variant	例外は想定されていません。
エラー	Variant	エラー処理は想定されていません。