始めたばかりですが、息切れ始まった感じです。 とりあえず、クイックソートの配列バージョンです。正直、エラー処理などもっとスマートにできる気がしますが、公開します。 Private Sub QuickSortArrayTest() Dim temp As Variant Dim data(0 To 3) As Vari…