• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Sıralama

  • Konbuyu başlatan Konbuyu başlatan nakah
  • Başlangıç tarihi Başlangıç tarihi
Katılım
26 Nisan 2006
Mesajlar
7
Merhaba,
Bir sütundaki sayıları Veri-->Sırala aracılığıyla büyükten küçüğe veya tam tersi sıralayabiliyoruz. Fakat benim istediğim, baştaki rakamları gözardı ederek, belirlediğimiz sıradaki bir rakamdan itibaren, aynen Veri-->Sırala menüsündeki mantığı uygulamak.
Basit bir örnekle açıklamak gerekirse, ilk 3 rakamı dikkate almayarak sıralamayı 4. rakamdan yapmak istediğimizi düşünelim:

756002265
433015023
123233444
388934465

Bunu nasıl yapabilirim?
 
Bunun için bir sütun ilave edin ve bu sütuna yazacağınız bir formülle (PARÇALA,SOLDAN veya SAĞDAN fonksiyonları gibi) veriden istediğiniz parçayı alın ve sıralamayı bu sütuna göre yapın.
 
Merhaba arkadaşlar,

A2 ile A10 arasında 1 ile 10 arasında sıralı olmayan bir sayı dizisi var. Bu sayı dizisini data /sortu kulllanmadan kod ile C2 den başlamak üzere küçükten büyüğe doğru sıralayacak koda ihtiyacım var.
 
Merhaba,
Örnek bir tablo olmadığı için C2 nin işlemle olan ilgisini tam anlayamadım.
Aşağıdaki kodları deneyiniz.
Kod:
Sub Makro1()
    Range("A2:A10").Select
    Selection.Copy
    Range("C2").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Range("C2").Select
    Range(Selection, Selection.End(xlDown)).Select
    Application.CutCopyMode = False
    ActiveWorkbook.Worksheets("Sayfa1").Sort.SortFields.Clear
    ActiveWorkbook.Worksheets("Sayfa1").Sort.SortFields.Add Key:=Range("C2"), _
        SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
    With ActiveWorkbook.Worksheets("Sayfa1").Sort
        .SetRange Range("C2:C10")
        .Header = xlNo
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
End Sub
 
Ben record etmeden ve data /sort yapmadan kod yazarak nasıl yaparız diyorum.
Sadece ilgili alanadaki verileri kod ile nasıl sıralarız öğrenmek istiyorum.
 
Merhaba Arkadaşlar,

A2 den başlayarak birbirinden farklı karışık olarak sıralanan verilerimi, bir kod ile B2 den başlayarak sıralamak istiyorum.
Ama kodun sıralaması şöyle olacak ; (Daha sonrada üzerinde oynamak için böyle olmasına ihtiyacım var)
Eğer B2 hücresi boşsa A kolonundaki değerlerin içinden en küçüğünü B2 ye yazacak. Sonra B2 ye yazdığı rakamın bir fazlasını A kolununda bulup B2 deki değerin altına yazacak ve böyle bir döngü, örnek dosyamı ekledim yardımlarınız için şimdiden teşekkür ederim.
 

Ekli dosyalar

Geri
Üst