combobox sıralama

[hsayar]

..................

''************************************************
''* Diziye alınanları comboboxa ekle
'ComboBox85 kısaltmasını başlat
With ComboBox85
    .Clear                                      'temizliyoruz
    For tci = 0 To UBound(arrTMM)               'tamamı dizisindeki son elamana kadar döngü kuruyoruz
        .AddItem                                'Elaman ekleme işlemin başlatıyoruz
        .List(tci, 0) = arrTMM(tci, 0)
        .List(tci, 1) = arrTMM(tci, 1)
        .List(tci, 2) = arrTMM(tci, 2)
        .ListIndex = 0
    Next tci
End With
Erase arrTMM
'___________________________

...............

yukarıdaki kodlar ile combobox dizideki elamnalrı aktarıyoruz yalnız

.List(tci, 1) = arrTMM(tci, 1)

sıralamayı bu satırda yer alan kolana göre yapmak istiyorum yani mevcut görüntü

1 C Z
2 A Y
3 Q D
4 B T

ise
2 A Y
4 B T
1 C Z
3 Q D


haline dönüştürmke mümkünmüdür?