Koşullu Max

[rders1905]

Merhaba,
A, B ve C sütunlarında belirli koşulları karşılayan verilerin D sütunundaki max ını almak istiyorum. Koşullu max ile ilgili bir veri bulamadım. Yardımcı olabilir misiniz?

 

[Emir Hüseyin Çoban]

. . .

Örnek Tablo:

Sub kod()
    f = Evaluate("MAX(IF(A1:A5=E1,IF(B1:B5=F1,C1:C5)))")
    Range("G1") = f
End Sub

. . .

 

[rders1905]

. . .

Örnek Tablo:

Sub kod()
    f = Evaluate("MAX(IF(A1:A5=E1,IF(B1:B5=F1,C1:C5)))")
    Range("G1") = f
End Sub

. . .

Aşağıdaki şekilde kodum var. Çalışmadı.

Private Sub CommandButton1_Click()
Kategori = ComboBox1.Value
tipi = ComboBox2.Value
son = Sheets("Sayfa1").[B100000].End(3).Row

f = Evaluate("MAX(EĞER(Sayfa1!B2:B" & son & "=" & Kategori & ",EĞER(Sayfa1!A2:A" & son & "=" & tipi & ",C1:C" & son & ")))")
MsgBox f

End Sub

 

[Emir Hüseyin Çoban]

. . .

Eğer değil if olarak yazarak deneyin.

. . .

 

[rders1905]

. . .

Eğer değil if olarak yazarak deneyin.

. . .

O şekilde de olmadı. Dosyayı ekledim.

 

[Emir Hüseyin Çoban]

. . .

Evaluate komutu hücre adresleri ile çalışır. Yardımcı hücre alanı kullanmamızda sakınca var mı.

. . .