• DİKKAT

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

İki farklı kritere uyan verileri sıralamak.

Katılım
10 Kasım 2006
Mesajlar
34
Excel Vers. ve Dili
exel xp türkçe
Sa
Benim şöyle bir sorunum var. A ve B sütunlarındaki istediğim kriterlere uyan satırları C sütunu da dahil alt alta sıralamak istiyorum.
 
Dosya eklemeden sorulan sorular ve verilen yanıtlar sağlıklı olmaz.
 
Merhaba,
Murat bey'in vereceği cevaba alternatif;
Kod:
=EĞERHATA(İNDİS($E$2:$E$8;KÜÇÜK(EĞER(($C$2:$C$8=8)*($D$2:$D$8="5/10");
  SATIR($E$2:$E$8)-SATIR($F$2)+1);SATIRSAY($F$2:F2)));"")
[COLOR="Blue"]Formül dizi formülüdür.CTRL + SHİFT + ENTER ile tamamlayınız.[/COLOR]
 
Son düzenleme:
Formül ile Alternatif;
Kod:
=eğerhata(indis($e$1:$e$8;küçük(eğer($c$2:$c$8=8;eğer($d$2:$d$8="5/10";satır($e$2:$e$8)));satır()-1));"")

Makro ile alternatif;
Kod:
[FONT="Trebuchet MS"]Sub Emre()
    Dim i%
    Columns([COLOR="red"]6[/COLOR]).ClearContents
    For i = [COLOR="red"]2[/COLOR] To Range("[COLOR="red"]A[/COLOR]65536").End(3).Row
        If Cells(i, [COLOR="red"]3[/COLOR]) = [COLOR="Red"]8 [/COLOR]And Cells(i, [COLOR="red"]4[/COLOR]) = "[COLOR="red"]5/10[/COLOR]" Then
            Range("[COLOR="red"]F[/COLOR]65536").End(3)(2, 1) = Cells(i, [COLOR="red"]5[/COLOR]).Value
        End If
    Next i
    i = Empty
End Sub[/FONT]
 
Çok teşekkürler istediğim gibi oldu. Emeğinize sağlık.
 
Geri
Üst