Excel VBA(大小排序)

請問不同大小的數字,如何在同一欄(Column)依序重小至大排列。THANKS!

3 個解答

評分
  • 2 0 年前
    最佳解答

    用一種叫做bubbling的演算法

    我在sheet1中的2~12放入數字

    Private Sub Ranking()

    For i = 1 To 12

    For j = i To 12

    If Cells(j, 1) > Cells(j + 1, 1) Then

    a = Cells(j, 1)

    b = Cells(j + 1, 1)

    Cells(j, 1) = b

    Cells(j + 1, 1) = a

    End If

    Next j

    Next i

    End Sub

  • 2 0 年前

    感恩!已解決了。

  • 2 0 年前

    用 Excel 的排序功能就可以了,如果你想用 VBA,只要錄一段操作排序的巨集來看看就可以了

還有問題?馬上發問,尋求解答。