使用VBA排序/分组相似数据

Question

早上好。我在将相似数据排序在一起时遇到问题。 这是我的数据

a  10
b  12
c  15
a  11
b  13
c  14

我想这样排序

a  10
a  11
b  12
b  13
c  15
c  14.

这是我正在使用的代码

For j = 9 To cpl

For k = 9 To cpl   
    If Cells(j, 5) = Cells(k, 5) Then      
        Cells(j, 15) = Cells(k, 5)        
    Else      
    k = k + 1
    End If
Next

Next