Hem rakam hem harf içeren hücrelerde ardışık sıralama

[abinkays]

selamlar arkadaşlar a sütununda yeralan
12 Nuri Çolaklı
9 Mehmet Keler
1001 Hüseyin Emek
1 Kasım Cenk
8 hulusi Lale
88 Yeliz Kırlı
904 Fikri Uşak
4 Nalan Arık

gibi, listem var
1 kasım cenk
4 Nalan Arık
8 hulusi Lale
9 Mehmet Keler
12 Nuri Çolaklı
88 Yeliz Kırlı........ gibi sıralamasını istiyorum fakat
baştaki rakamlara göre yazıyorum
1 Kasım Cenk
1001 Hüseyin Emek
12 Nuri Çolaklı
4 Nalan Arık
8 hulusi Lale
88 Yeliz Kırlı
9 Mehmet Keler
904 Fikri Uşak
şeklinde sıralıyor. yardımcı olursanız sevinirim
vesselam

 

[Ömer BARAN]

Verilerin 1'inci satırdan başlığını varsaydım.
Sorun yaşama nedeniniz sıralamanın METİN cinsinden yapılması.
Sayıya göre sıralamak için aşağıdaki şekilde işlem yapabilirsiniz.
B1 hücresine aşağıdaki formülü uygulayın ve sonra A ve B sütununu seçip
B sütununa göre sıralama yapın.

=0+SOLDAN(A1;BUL(" ";A1;1)-1)

Gerekli değilse, sonra B sütununu silebilirsiniz.

Ya da VERİ menüsündeki METNİ SÜTUNLARA DÖNÜŞTÜR kısmından sayılarla metinleri
farklı sütunlara aktarıp ondan sonra sayıya göre sıralama yapabilirsiniz.

 

[Murat OSMA]

Ömer Bey'in belirttiği çözümü makro ile bu şekilde yapabilirsiniz.

[FONT="Trebuchet MS"][SIZE="2"]Sub Emre() 
    Dim i%, son%
    son = Range("A65536").End(3).Row
    For i = 1 To son
        Cells(i, 2) = [COLOR="Red"]Val[/COLOR](Cells(i, 1).Value)
    Next i
    Range("A1:B" & son).[COLOR="red"]Sort [/COLOR]Range("B1"), 1
    Columns(2).ClearContents
    son = Empty: i = Empty
End Sub[/SIZE][/FONT]

 

[abinkays]

Hay Allah C.C. sizden razı olsun çok teşekkür ederim sağolun var olun