• DİKKAT

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

Veri eşleştirme-karşılaştırma hakkında yardım

  • Konbuyu başlatan Konbuyu başlatan hrryet
  • Başlangıç tarihi Başlangıç tarihi
Katılım
4 Eylül 2009
Mesajlar
40
Excel Vers. ve Dili
excell 2007 türkçe
Arkadaşlar Merhaba.

Öncelikle sitede emeği geçen herkese teşekkür ederim..

Sitede aramadığım yer kalmadı fakat yapmak istediğimi bulamadım.

Benim sizlere sorum şöyledir:

Aynı kitapta 2 farklı excell sayfam var ve her iki sayfada da aynı başlık ve içerikte tablom var. Bu sayfadaki tabloları karşılaştırıp, tablodaki tüm veriler eşleşiyorsa doğum tarihi kolonundaki verileri getirtmek istiyorum.

Ben "eğer" kullanarak her bir kolonu ayrı ayrı yapıyorum ama olmuyor. tek bir formülde tüm kolonları eşleştirmek ve veriyi getirmek istiyorum.

Konunun detayı ekli dosyamda mevcut. Yardımlarınıza çok ihtiyacım var.

Şimdiden teşekkür ederim.
 

Ekli dosyalar

Merhaba,

A2,

Kod:
=İNDİS(durum!$D$2:$D$100;KAÇINCI(B2&C2;durum!$A$2:$A$100&durum!$B$2:$B$100;0))

Dizi formülüdür. Girişini ctrl shift enter tuş kombinasyonu ile tamamlayınız..

.
 
verdiğiniz formül işime yaradı,sorunumu çözdüm

yardımınız için çok teşekkür ederim.
 
Merhaba,

Yukarıda belirttiğim sorunumu makro ile çözmemiz mümkün müdür?

Bu konuda yardımcı olabilirmisiniz bana.

Teşekkür eder, saygılar sunarım.
 
Merhaba,
Kod:
Sub Aktar()
Set d = Sheets("durum")
Range("a2:a" & [a65536].End(3).Row).ClearContents
For x = 2 To [b65536].End(3).Row
If Cells(x, "b") & Cells(x, "c") & Cells(x, "d") = d.Cells(x, "a") & d.Cells(x, "b") & d.Cells(x, "c") Then
Cells(x, "a") = d.Cells(x, "d")
End If: Next
End Sub
 

Ekli dosyalar

çok teşekkür ederim yardımınız için.makro işimi görüyor. fakat kodu butona aktarmışsınız. butonsuz direkt makro çalıştır kısmından yapamaz mıyız?
 
Geri
Üst