vba如何實現並行排序

我來說說想法。先定義壹個數組存儲這個分數a(i)a(i)存儲分數，排序(具體值我可以根據實際情況設置)。然後寫k = 1’存儲排名表1。單元格(I，1) =壹張(1)655。2)=駐科部隊i = 2到x 'x根據實際情況，k = k+1sheet1。單元格(I，1) = a (i) ifsheet1。Cells (i，1)= sheet1.cells (I-1，1)然後sheet 1 . cells(I，2)= sheet 1 . cells(I-1，2)。