En büyük değer bulma

[ommerk]

A sütununda sipariş numaraları var ve karşılığında belirsiz sayılar var belirsiz değerlere kadar bazı aralıkları boş fakat.
A sütunundaki sipariş numarasına karşılık gelen b sütünundaki en büyük sayıyı bir başka hücrede bir formül ile nasıl aktarabilirim
office 2007 türkçe kullanıyorum

 

[Merhum İdris SERDAR]

.

Buradaki örnekleri inceleyiniz:

http://www.excel.web.tr/f122/minimum-ve-maksimum-ornekleri-t87022.html


.

 

[excelci1]

A sütununda sipariş numaraları var ve karşılığında belirsiz sayılar var belirsiz değerlere kadar bazı aralıkları boş fakat.
A sütunundaki sipariş numarasına karşılık gelen b sütünundaki en büyük sayıyı bir başka hücrede bir formül ile nasıl aktarabilirim
office 2007 türkçe kullanıyorum

dosyanız ektedir.

açıklama : siparişini veri aralığını bul. mak formülü ile en büyük değerini yazdır

 

[Murat OSMA]

Sn. excel1, 627 yazıldığında, neden 7 sayısı bulunuyor ? :dusun:

 

[Merhum İdris SERDAR]

.

Link vermekle birlikte:

=TOPLA.ÇARPIM(MAK(--(A2:A30=E3)*B2:B30))
=SUMPRODUCT(MAX(--(A2:A30=E3)*B2:B30))

veya:

Dizi formülü olarak:

=MAK(EĞER(A2:A30=E3;B2:B30))
=MAX(IF(A2:A30=E3;B2:B30))

şeklinde deneyin.

.

 

[excelci1]

Sn. excel1, 627 yazıldığında, neden 7 sayısı bulunuyor ? :dusun:

=MAK(DOLAYLI("B"&KAÇINCI(E3;A2:A28;0)+1&":B"&KAÇINCI(E3;A2:A28;0)+EĞERSAY(A2:A28;E3)))

formüle +1 gerekiyormuş, gözden kaçırmışım. uyarınız için teşekürler

 

[Murat OSMA]

Rica ederim, iyi günler...

 

[Murat OSMA]

KTF ile örnek vereyim...

Function HedefinBuyugu(ByVal Hedef As String, ByVal Alan As Range) As Double
    Dim evn As Double
    Application.Volatile
    For Each i In Alan.Value
        a = a + 1
        deger = Alan.Offset(0, -1).Value
        If deger(a, 1) = Hedef And evn < i Then
            evn = i
        End If
    Next i
    HedefinBuyugu = evn
    a = Empty: i = Empty: evn = Empty
End Function

Hücrede kullanımı:

=HedefinBuyugu(E3;B1:B27)