İki yerden süz ve en büyük tarihi getir

Katılım
3 Mart 2005
Mesajlar
44
Excel Vers. ve Dili
Office 2003 Türkçe
Arkadaşlar herkese selamlar,
aşağıdaki konuyu arattırdım ne makrosunu nede fonksiyonlu olarak bulamadım vede yapamadım yardımcı olursanız sevinirim..

2 çalışma sayfalı bir excel dosyam var,
C sütunundaki bir ismi A sütununda ve başka bir sayfada arattırıp ve buna karşılık gelen yanındaki satırdaki tarihlerden en büyük olanını yazdırmak istiyorum.

Konu ile ilgili dosya ektedir.

Şimdiden teşekkürler.
 
Katılım
3 Mart 2005
Mesajlar
44
Excel Vers. ve Dili
Office 2003 Türkçe
çok özür dilerim, üzerinde çalıştığım dosyayı farklı kaydetmiştim şifreyi unutmuşum.
Şifre: s
 

hamitcan

Uzman
Uzman
Katılım
1 Temmuz 2004
Mesajlar
7,680
Excel Vers. ve Dili
Excel 2019 Türkçe
Aşağıdaki formülü dener misiniz?
Kod:
=EĞER(EĞER(EHATALIYSA(DÜŞEYARA(C13;LISTE!C13:J25;8;YANLIŞ));0;DÜŞEYARA(C13;LISTE!C13:J25;8;YANLIŞ))>D13;DÜŞEYARA(C13;LISTE!C13:J25;8;YANLIŞ))
 
Katılım
3 Mart 2005
Mesajlar
44
Excel Vers. ve Dili
Office 2003 Türkçe
hamitcan yanıtın için teşekkürler ama olmadı sanırım ben tam anlatamadım:
çok uğraştım ama beceremedim.
Özetle sorumu tekrar sorayım,

C2 deki metni A sütununda arattırmak (C2 deki metin A sütununda birden fazla var) ve bunların karşılığına gelen E sütunundaki tarihlerden en büyük olanı yazdırmak istiyorum.

dosya ekte
 

hamitcan

Uzman
Uzman
Katılım
1 Temmuz 2004
Mesajlar
7,680
Excel Vers. ve Dili
Excel 2019 Türkçe
Sayın meydanci, yerleşik fonksiyonları açıkcası çok iyi kullanamıyorum. Bu yüzden kullanıcı tanımlı bir fonksiyon yazdım. Ama sitede konuya hakim arkadaşlar oldukça fazla. Hatta sorunuz belki de daha önce çözülmüş olabilirde.
Fonksiyonun açıklaması;
Aşağıdaki fonksiyonu bir module içine yerleştirin ve =enbuyuk(adi) şeklinde kullanın.
Not:"A" sütununun alfabetik sırada olması gerekiyor.

Kod:
Function enbuyuk(adi As String) As Date
    bas = WorksheetFunction.Match(adi, Columns(1), 0)
    bit = WorksheetFunction.Match(adi, Columns(1), 1)
    enbuyuk = WorksheetFunction.Max(Range("e" & bas & ":" & "e" & bit))
End Function
 
Katılım
3 Mart 2005
Mesajlar
44
Excel Vers. ve Dili
Office 2003 Türkçe
Hamitcan arkadaşım çok teşekkürler, işte tam istediğim buydu işimi gördü teşekkürler..
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
41,588
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Selamlar,

F14 hücresine aşağıdaki formülü uygulayın ve CTRL+SHIFT+ENTER tuşlarıyla formülü tamamlayarak dizi formül haline getirin.

Kod:
=MAK(EĞER($A$2:$A$1000=C14;$E$2:$E$1000))
 

Ali

Uzman
Katılım
21 Temmuz 2005
Mesajlar
7,895
Excel Vers. ve Dili
İş:Excel 2016-Türkçe
F14 hücrenize

=MAK(EĞER(($A$2:$A$98=C14);$E$2:$E$98))

yazıp direk entere basmadan CTRL+SHIFT+ENTER tuşlarına birlikte basınız excel bir dizi formülü oluşturacaktır.
 

Ali

Uzman
Katılım
21 Temmuz 2005
Mesajlar
7,895
Excel Vers. ve Dili
İş:Excel 2016-Türkçe
Sn COST_CONTROL hızlı davranmış.:)
 
Katılım
3 Mart 2005
Mesajlar
44
Excel Vers. ve Dili
Office 2003 Türkçe
Süper, CTRL+SHIFT+ENTER ı da öğrendik,, daha çook okumak lazım,
hepinize teşekkürler
 
Üst