Excel'de en yüksek puanın karşılık geldiği adı nasıl gösterirsiniz?
Excel’de performansı veya sonuçları analiz ederken, genellikle isimler ve bu isimlere ait değerler içeren bir veri kümesinden en yüksek puanı kimin aldığını belirleme ihtiyacı duyarsınız. Örneğin, bir sütunda öğrenci isimleri, diğerinde ise sınav puanları yer alabilir. Buradaki amaç yalnızca en yüksek puanın ne olduğunu tespit etmek değil; aynı zamanda en iyi sonucu alan kişinin — ya da beraberlik söz konusuysa kişilerin — adını da göstermektir. Bu işlem, en iyi satış temsilcilerini belirleme, öğrenci notlarını değerlendirme, çalışan performans sonuçlarını inceleme veya sıralamanın kritik olduğu her türlü durumda yaygın olarak kullanılır.
Aşağıda, yaygın hatalardan kaçınmanıza yardımcı olacak adım adım talimatlar ve ipuçları içeren birkaç pratik çözüm sunulmuştur. Veri hacminize ve raporlama ihtiyaçlarınıza en uygun olanı seçin.
Formüllerle en yüksek puanın karşılık gelen adını gösterme
VBA Kodu – En yüksek puan için otomatik olarak ad(lar)ı bulma ve gösterme
PivotTable – En yüksek puana karşılık gelen adı göstermek için bir PivotTable kullanın
Formüllerle en yüksek puanın karşılık gelen adını gösterme
En yüksek puanı alan kişinin adını almak için aşağıdaki formüller size yardımcı olabilir. Bu yöntem, küçük ve orta büyüklükteki veri kümeleri için idealdir ve ek araçlar kullanmadan en iyi performansı gösteren kişiyi hızlıca belirlemek istediğinizde mükemmel sonuç verir.
En yüksek puana karşılık gelen adı bulmak için şu formül kombinasyonunu kullanın:INDEXve MATCH
1. Adını göstermek istediğiniz boş bir hücreye (örneğin C2 hücresi) aşağıdaki formülü girin:
=INDEX(A2:A14,MATCH(MAX(B2:B14),B2:B14,FALSE))&" Scored "&MAX(B2:B14)Formülü yazdıktan sonra onaylamak için Enter tuşuna basın. Formül, en yüksek puana sahip ilk adı döndürecektir. Örneğin, hem John hem de Alice 98 puan aldıysa, bu formül yalnızca ilk eşleşmeyi döndürür.
Notlar:
1. Yukarıdaki formülde, A2:A14 adların alındığı Ad listesi, B2:B14 ise puan listesidir. Aralıkların verilerinizle tam olarak eşleştiğinden emin olun.
2. Formül yalnızca ilk eşleşen adı döndürür. Birden fazla kişi en yüksek puanı paylaşıyorsa ve tüm isimleri göstermek istiyorsanız, pratik bir çözüm için aşağıya bakın.
Herhangi bir hücreye (örneğin D2) aşağıdaki formülü girin:
=INDEX($A$2:$A$14,SMALL(IF($B$2:$B$14=MAX($B$2:$B$14),ROW($B$2:$B$14)-1),ROW(B2)-1))Formülü yazdıktan sonra, dizi formülü haline getirmek için aynı anda Ctrl + Shift + Enter tuşlarına basın (yalnızca Enter’a basmayın). En yüksek puana sahip isim görünecektir. Ardından formül hücresini seçip doldurma tutamacını aşağı doğru sürükleyin. Hata değerleri görünene kadar sürüklemeye devam edin – her satır, en yüksek puanı paylaşan bir sonraki kişiyi gösterecektir. Bu özellikle beraberlikler olduğunda ve tüm kazananları listelemek istediğinizde son derece kullanışlıdır.
Excel sürümünüz dinamik dizileri destekliyorsa (örneğin Office 365 veya Excel 2021 ve sonrası), çok daha basit bir yaklaşım kullanabilirsiniz. Bir hücreye aşağıdaki formülü girin ve yalnızca Enter tuşuna basarak deneyin:
=FILTER(A2:A14,B2:B14=MAX(B2:B14))Bu formül, tüm üst isimleri alttaki hücrelere otomatik olarak doldurur; sürüklemenize veya özel klavye kısayollarına gerek kalmaz. En yeni Excel sürümlerinde son derece kullanışlı ve etkilidir.
Formüller hızlı aramalar için güçlüdür; ancak binlerce satırdan oluşan çok büyük veri kümelerinde performans düşebilir, bu nedenle en uygun çözüm olmayabilir. Ayrıca, doğru sonuç alabilmek için formüllerin satır eklendiğinde veya kaldırıldığında tutarlı aralık başvurularına ihtiyaç duyduğunu unutmayın – bu yüzden veri seçimlerinizi her zaman kontrol edin.
VBA Kodu – En yüksek puan için otomatik olarak ad(lar)ı bulma ve gösterme
VBA makrolarını kullanmak, özellikle formüller büyük listelerde yetersiz kalıyor veya aşırı karmaşıklaşıyorsa, veri kümenizdeki en yüksek puana sahip tüm ad(lar)ı bulup görüntülemek için esnek ve otomatik bir çözüm sunar. VBA sayesinde mantığı raporlama ihtiyaçlarınıza göre özelleştirebilir ve güncellemeleri otomatik olarak işletebilirsiniz; bu da tekrarlayan analizlerde veya toplu işlemlerde son derece değerli hale gelir.
1. Excel çalışma kitabınızı açın, ardından Geliştirici > Visual Basic seçeneğine tıklayın. Microsoft Visual Basic for Applications penceresinde boş bir modül eklemek için Ekle > Modül seçeneğine tıklayın.
Aşağıdaki VBA kodunu modül penceresine kopyalayıp yapıştırın:
Sub ShowTopNames()
Dim rngNames As Range, rngScores As Range, outCell As Range
Dim nArr As Variant, sArr As Variant
Dim i As Long, maxVal As Double, hasVal As Boolean
Dim namesBuf As String
On Error Resume Next
Set rngNames = Application.InputBox("Please select the name column (single column)", "Top Names", Type:=8)
Set rngScores = Application.InputBox("Please select the score column (single column, same rows as names)", "Top Names", Type:=8)
Set outCell = Application.InputBox("Please select the output cell (optional, click Cancel to skip)", "Top Names", Type:=8)
On Error GoTo 0
If rngNames Is Nothing Or rngScores Is Nothing Then Exit Sub
If rngNames.Rows.Count <> rngScores.Rows.Count Or rngNames.Columns.Count <> 1 Or rngScores.Columns.Count <> 1 Then
MsgBox "Range mismatch: Name column and score column must be single columns with the same number of rows.", vbExclamation
Exit Sub
End If
nArr = rngNames.Value2
sArr = rngScores.Value2
hasVal = False
For i = 1 To UBound(sArr, 1)
If IsNumeric(sArr(i, 1)) And Not IsEmpty(sArr(i, 1)) Then
If Not hasVal Then
maxVal = CDbl(sArr(i, 1))
hasVal = True
ElseIf CDbl(sArr(i, 1)) > maxVal Then
maxVal = CDbl(sArr(i, 1))
End If
End If
Next i
If Not hasVal Then
MsgBox "No valid numeric values found in the score column.", vbInformation
Exit Sub
End If
rngNames.EntireRow.Interior.ColorIndex = xlNone
For i = 1 To UBound(sArr, 1)
If IsNumeric(sArr(i, 1)) Then
If CDbl(sArr(i, 1)) = maxVal Then
rngNames.Cells(i, 1).EntireRow.Interior.Color = RGB(255, 255, 153) ' Light yellow
If Len(namesBuf) > 0 Then namesBuf = namesBuf & ", "
namesBuf = namesBuf & CStr(nArr(i, 1))
End If
End If
Next i
If Not outCell Is Nothing Then
outCell.Value = "Top Score: " & maxVal & " | Name(s): " & namesBuf
End If
MsgBox "Top Score = " & maxVal & vbCrLf & "Name(s): " & namesBuf, vbInformation, "Highest Score"
End Sub
2. Ardından kodu çalıştırmak için F5 tuşuna basın. Üç uyarı mesajı göreceksiniz: Select the name column (single column). Yalnızca isimleri seçmek için (örneğin A2:A14) ilgili sütunu sürükleyip seçin → Tamam. Select the score column (single column, same rows as names). Puanları seçmek için (örneğin B2:B14) ilgili sütunu sürükleyip seçin → Tamam. Çıktı hücresini seçin (isteğe bağlı). Sonucu yerleştirmek için bir hedef hücreye (örneğin D2) tıklayın.
Kod çalıştıktan sonra sonuç belirtilen hücrede görüntülenecek ve tüm berabere kalan en iyi puan sahiplerinin satırları açık sarı renkle vurgulanacaktır.
PivotTable – En yüksek puana karşılık gelen adı göstermek için bir PivotTable kullanın
Excel'deki PivotTable, verileri analiz etmek ve özetlemek için görsel, etkileşimli ve son derece pratik bir yöntem sunar. Özellikle büyük veri kümelerini işlerken, grup analizleri yaparken veya her kategori ya da listede genel olarak en yüksek puanı alan gibi benzersiz Maksimum Değer'leri hızla belirlemek için idealdir. Bu yaklaşım, formül veya kodlama gerektirmez; bu da nokta-tıkla çözümleri tercih eden ve düzenli raporlama görevlerini yürüten kullanıcılar için mükemmel bir seçimdir.
Bu gereksinim için bir PivotTable kullanmanın temel iş akışı şu şekildedir:
1. Veri Aralığınız içindeki herhangi bir hücreyi seçin (hem isim hem puan sütunlarını içerecek şekilde), ardından Ekle > Özet Tablo yolunu izleyin. İletişim kutusunda Veri Aralığınızı onaylayın ve Özet Tabloyu yeni bir çalışma sayfasına mı yoksa mevcut çalışma sayfasına mı yerleştirmek istediğinizi seçin.
2. Özet Tablo Alanları bölmesinde, Ad alanını Satırlar bölgesine, Puan alanını ise Değerler bölgesine sürükleyin. Değerler bölgesi varsayılan olarak "Toplam" veya "Say" olarak ayarlanır. Değerler bölgesindeki Puan alanının yanındaki açılır oka tıklayıp Değer Alan Ayarları seçeneğini seçin ve özetleme işlevi olarak Maks’ı belirleyin. Ardından Tamam’a tıklayın.
3. Artık PivotTable, her isim için en yüksek puanı gösteriyor. Genelde en iyi puan sahibini vurgulamak için "Puanın Maks" sütununu azalan düzende sıralayın – listenin en üstündeki isim, en yüksek (veya en yükseklerden biri) puana sahip olacak. Görsel vurgu için filtreler veya Koşullu Biçimlendirme kullanmayı da düşünebilirsiniz.
Yalnızca en iyi puan sahibi(ler)ni göstermek istiyorsanız, Değer Filtreleri’ni uygulayın: İsimler için Satır Etiketleri’ndeki açılır oka tıklayın, Değer Filtreleri > Eşittir seçeneğini seçin ve değeri en yüksek puana ayarlayın (bu değeri geçici olarak değerleri sıralayarak veya Puanın Maks sütunundaki en yüksek sayıyı kontrol ederek belirleyebilirsiniz). Böylece raporunuzu yalnızca kazanan isim(ler)e odaklayabilirsiniz.
PivotTable, veri keşfi için son derece güçlüdür: Verilerinizi kolayca güncelleyebilir, genişletebilir veya filtreleyebilir ve sonuçların otomatik olarak yeniden hesaplanması için PivotTable’ı yenileyebilirsiniz. Ancak veri kümeniz sık sık değişiyorsa, yeni veri ekledikten sonra her zaman PivotTable’a sağ tıklayıp Yenile seçeneğini seçmeyi unutmayın.
PivotTable başlangıçta biraz kurulum gerektirebilir; ancak verilerinizde ek kategoriler (örneğin departman veya ekip) varsa, gruplar arasında esnek raporlama ve karşılaştırmalar sunar.
Özetleme veya sıralama yaparken sorun yaşıyorsanız, verilerinizin boş hücre içermemesine ve “Koşul Adı”nın tutarlı şekilde yazıldığından emin olun. Özellikle büyük listeler kullanırken, “Kaynak aralığı”nı dikkatlice kontrol etmek, PivotTable’ın tüm “İlgili Veriler”i doğru şekilde hesaba kattığından emin olmanızı sağlar.
KUTOOLS AI ile Excel'in Sihirli Gücünü Açığa Çıkarın
- Akıllı Yürütme: Hücre işlemlerini gerçekleştirin, verileri analiz edin ve hepsi basit komutlarla çalışan grafikler oluşturun.
- Özel formüller: İş akışlarınızı kolaylaştırmak için özelleştirilmiş formüller oluşturun.
- VBA Kodlama: VBA kodlarını zahmetsizce yazın ve uygulayın.
- Formül Yorumlama: Karmaşık formülleri kolayca çözmek artık çok daha basit!
- Metin Çevirisi: Elektronik tablolarınızda dil bariyerlerini aşın.
En İyi Office Üretkenlik Araçları
Excel becerilerinizi Kutools for Excel ile geliştirin ve verimlilikte hiç yaşamadığınız bir deneyim yaşayın.Kutools for Excel, üretkenliği artırmak ve Zamanı Kaydet için 300’den fazla gelişmiş özelliğe sahiptir.İhtiyacınız olan özelliği hemen edinmek için buraya tıklayın…
Office Tab, Office uygulamalarına sekmeli bir arayüz kazandırarak işlerinizi çok daha kolay hale getirir.
- Word, Excel, PowerPoint, Publisher, Access, Visio ve Project'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
- Belgeleri yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açıp oluşturun.
- Günlük üretkenliğinizi %50 artırır ve her gün yüzlerce fare tıklamasından tasarruf etmenizi sağlar!
Tüm Kutools eklentileri — tek bir kurulum dosyasında!
Kutools for Office paketi, Excel, Word, Outlook ve PowerPoint eklentilerini ve ayrıca Office Tab Pro’yu içeren kapsamlı bir çözümdür; Office uygulamalarında çalışan ekipler için idealdir.
- Hepsi bir arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
- Tek kurulum, tek lisans— birkaç dakikada hazır (MSI uyumlu)
- Birlikte daha iyi çalışır— Office uygulamalarında akıcı üretkenlik
- 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
- En iyi fiyat performans— ayrı ayrı eklenti satın almaya göre tasarruf sağlar