Skip to main content

Kutools for Office — Bir Paket. Beş Araç. Daha Fazla İş Yapın.

Excel'de verileri ters sıralamada nasıl sıralayabilirsiniz?

Author Sun Last modified

Excel'de, tipik olanı kullanarak =RANK(hücre, aralık) formül, verilerinizi en büyük değere 1 sıralaması atayacak şekilde sıralar, en küçük değer ise en düşük sıra numarasını alır. Ancak, en küçük değere en yüksek sıralamayı ve en büyüğü son sıraya atanacak şekilde bu mantığı tersine çevirmeniz gereken durumlar olabilir; bu, aşağıdaki ekran görüntüsünde gösterilmiştir. Bu, özellikle daha düşük değerlerin daha iyi performansı temsil ettiği yarış süreleri, maliyetler veya hata sayıları gibi verileri analiz ederken faydalı olabilir.
A screenshot showing data ranked in reverse order in Excel

Ters sırada veri sıralama | VBA Kodu: Ters sıralamaları otomatik olarak ata


Ters sırada veri sıralama

Excel'de ters sıralama yapmak için, standart RANK formülünü biraz değiştirebilir ve ek bir argüman belirleyebilirsiniz. Bu yaklaşım, varsayılan sıralamadan ziyade verileri en küçükten en büyüğe sıralamanıza olanak tanır.

Ters sıra sonucunun görünmesini istediğiniz boş bir hücre seçin. Veri aralığınız B2 ile B10 hücrelerinde olduğunu varsayarsak, ilk hücreye (örneğin C2 hücresinde) aşağıdaki formülü girin:

=RANK(B2,$B$2:$B$10,1)

Formülü girdikten sonra, basın Enter. Formülü sütundaki diğer hücrelere uygulamak için doldurma tutamacını kullanın: formülü girdiğiniz hücrenin (C2) sağ alt köşesine fare imlecinizi getirin ve imleç artı işareti şeklini aldığında, veri aralığınızdaki kalan hücreleri doldurmak için aşağıya doğru sürükleyin (bu örnekte C10'a kadar). 
A screenshot of reverse rank formula applied in Excel

Veri aralığınız farklıysa, formül içindeki hücre referanslarını gerçek verilerinize uyacak şekilde ayarlayın. Unutmayın, yinelenen değerlere sahipseniz, RANK fonksiyonu bu değerlere aynı sıralamayı atayacak ve sonraki sıralamalar atlanacaktır (örneğin, ikinci sırada iki öğe varsa, bir sonraki sıra dört olacaktır).

Ters sıralama, en düşük değerleri veya en hızlı süreleri vurgulamak istediğinizde özellikle değerlidir ve bağların kabul edilebilir veya beklenen olduğu veri setlerinde iyi çalışır.


VBA Kodu: Ters sıralamaları otomatik olarak ata

Daha büyük veri setleri veya verilerinizin sık sık güncellendiği ve daha otomatik bir çözüme ihtiyaç duyduğunuz senaryolar için, ters sıralamaları hızlı ve verimli bir şekilde atamak üzere VBA kodu kullanabilirsiniz. Bu yöntem, az miktarda programlamaya alışkın olan ve tekrarlayan manuel adımları ortadan kaldırmayı amaçlayan kullanıcılar için idealdir.

1. Geliştirici Araçları > Visual Basic'i tıklayarak VBA düzenleyicisini açın. Visual Basic for Applications penceresinde, Ekle > Modül'e tıklayın ve aşağıdaki kodu Modül bölmesine yapıştırın:

Sub AssignReverseRank()
    Dim dataRange As Range
    Dim outputRange As Range
    Dim i As Long
    Dim j As Long
    Dim temp As Variant
    Dim arr As Variant
    Dim sortedArr As Variant
    Dim rankArr() As Long
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set dataRange = Application.InputBox("Select the data range to rank (single column):", xTitleId, "", Type:=8)
    If dataRange Is Nothing Then Exit Sub
    
    Set outputRange = Application.InputBox("Select the first cell for output ranks:", xTitleId, "", Type:=8)
    If outputRange Is Nothing Then Exit Sub
    
    arr = dataRange.Value
    ReDim rankArr(1 To UBound(arr, 1), 1 To 1)
    sortedArr = arr
    
    ' Sort the array in ascending order
    For i = 1 To UBound(sortedArr, 1) - 1
        For j = i + 1 To UBound(sortedArr, 1)
            If sortedArr(i, 1) > sortedArr(j, 1) Then
                temp = sortedArr(i, 1)
                sortedArr(i, 1) = sortedArr(j, 1)
                sortedArr(j, 1) = temp
            End If
        Next j
    Next i
    
    ' Assign reverse ranks
    For i = 1 To UBound(arr, 1)
        For j = 1 To UBound(sortedArr, 1)
            If arr(i, 1) = sortedArr(j, 1) Then
                rankArr(i, 1) = j
                Exit For
            End If
        Next j
    Next i
    
    outputRange.Resize(UBound(rankArr, 1), 1).Value = rankArr
End Sub

2. Makroyu çalıştırmak için Run button Çalıştır düğmesine basın veya F5tuşuna basın. Veri aralığınızı seçmeniz istenecek (ters sırada sıralamak istediğiniz tek bir sütunu seçin) ve ardından sıralama sonuçlarının çıktısını almak istediğiniz ilk hücreyi seçin. Her seçimden sonra Tamam'ı tıklayın.

Bu makro, verilerinizi artan sırada sıralar ve buna göre ters sıralamalar atar, en küçük değeri 1. sıraya yerleştirir. Binlerce girişi bir seferde sıralamak veya düzenli olarak yenilenen raporlarda sıralamayı otomatikleştirmek için özellikle yararlıdır.

Bu makroyu kullanırken, verilerinizin bitişik olduğundan ve yalnızca sayısal değerler içerdiğinden emin olun. Sayısal olmayan veya boş hücreler yanlış çıktıya neden olabilir, bu yüzden önce verilerinizi temizlemek en iyisidir. Ayrıca, makroları çalıştırmadan önce çalışma kitabınızı kaydetmek, istenmeyen değişiklikleri önlemek için iyi bir önlemdir.


En İyi Ofis Verimlilik Araçları

🤖 Kutools AI Asistanı: Veri analizinde devrim yaratın – Akıllı Yürütme | Kod Oluştur | Özel Formüller Oluştur | Verileri Analiz Et ve Grafikler Oluştur | Kutools Fonksiyonlarını Çağır
Popüler Özellikler: Yinelenenleri Bul, Vurgula veya İşaretle | Boş Satırları Sil | Sütunları veya Hücreleri Veriyi Kaybetmeden Birleştir | Formül olmadan Yuvarla...
Süper ARA: Çoklu Kriter VLookup | Çoklu Değer VLookup | Çoklu sayfa araması | Bulanık Eşleme....
Gelişmiş Açılır Liste: Hızlıca Açılır Liste Oluştur | Bağımlı Açılır Liste | Çoklu seçimli Açılır Liste....
Sütun Yöneticisi: Belirli Sayıda Sütun Ekle | Sütunları Taşı | Gizli Sütunların Görünürlük Durumunu Değiştir | Aralıkları & Sütunları Karşılaştır...
Öne Çıkan Özellikler: Izgara Odaklama | Tasarım Görünümü | Gelişmiş formül çubuğu | Çalışma Kitabı & Çalışma Sayfası Yöneticisi | Otomatik Metin Kütüphanesi | Tarih Seçici | Veri Birleştir | Hücreleri Şifrele/Şifre Çöz | Listeye Göre E-posta Gönder | Süper Filtre | Özel Filtre (kalın/italik/üstü çizili filtreleme...)...
En İyi15 Araç Takımı:12 Metin Aracı (Metin Ekle, Belirli Karakterleri Sil, ...) | 50+ Grafik Türü (Gantt Grafiği, ...) | 40+ Pratik Formül (Doğum tarihine dayanarak yaş hesapla, ...) | 19 Ekleme Aracı (QR Kodu Ekle, Yoldan Resim Ekle, ...) | 12 Dönüşüm Aracı (Kelimeye Dönüştür, Para Birimi Dönüştürme, ...) | 7 Birleştirme & Bölme Aracı (Gelişmiş Satırları Birleştir, Hücreleri Böl, ...) | ... ve dahası
Kutools'u tercih ettiğiniz dilde kullanın – İngilizce, İspanyolca, Almanca, Fransızca, Çince ve40+ diğer dili destekler!

Kutools for Excel ile Excel becerilerinizi güçlendirin ve benzersiz bir verimlilik deneyimi yaşayın. Kutools for Excel, üretkenliği artırmak ve zamandan tasarruf etmek için300'den fazla Gelişmiş Özellik sunuyor. İhtiyacınız olan özelliği almak için buraya tıklayın...


Office Tab, Ofis uygulamalarına sekmeli arayüz kazandırır ve işinizi çok daha kolaylaştırır.

  • Word, Excel, PowerPoint'te sekmeli düzenleme ve okuma işlevini etkinleştirin.
  • Yeni pencereler yerine aynı pencerede yeni sekmelerde birden fazla belge açıp oluşturun.
  • Verimliliğinizi %50 artırır ve her gün yüzlerce mouse tıklaması azaltır!

Tüm Kutools eklentileri. Tek kurulum

Kutools for Office paketi, Excel, Word, Outlook & PowerPoint için eklentileri ve Office Tab Pro'yu bir araya getirir; Office uygulamalarında çalışan ekipler için ideal bir çözümdür.

Excel Word Outlook Tabs PowerPoint
  • Hepsi bir arada paket — Excel, Word, Outlook & PowerPoint eklentileri + Office Tab Pro
  • Tek kurulum, tek lisans — dakikalar içinde kurulun (MSI hazır)
  • Birlikte daha verimli — Ofis uygulamalarında hızlı üretkenlik
  • 30 günlük tam özellikli deneme — kayıt yok, kredi kartı yok
  • En iyi değer — tek tek eklenti almak yerine tasarruf edin