• DİKKAT

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

Soru Hücredeki Boşluğa Kadar Olan Veriyi Ölçüt Alarak Koşullu Veri Yazdırma

Believing

Altın Üye
Katılım
19 Mayıs 2013
Mesajlar
703
Excel Vers. ve Dili
Office Pro 2019 TR 32 Bit
Windows Pro 10 TR 64 Bit
Merhaba Formdaş Arkadaşlar,

Ekteki örnek çalışmadaki VERİTABANI sayfasının 7. satırındaki hücreler, Kod + Birden Fazla Boşluk + Kodun açıklaması şeklinde oluşmaktadır.
ANA SAYFANIN 31. satırındaki başlıklar ise sadece Kodlardan oluşmaktadır.
VERİTABANI sayfasının ilgili hücrelerindeki boşluğa kadar olan verileri ölçüt aralığı olarak kullanarak, ANA SAYFA'nın 31. satırındaki kodlar ile eşleştirerek, ilgili kodlara ait sayısal değerleri 32. satıra yazdırmak istiyorum.
Maalesef yukarıdaki koşulları sağlayacak Formüller kombinasyonunu yapamadım. Benim için çok değerli olan yardımlarınızı rica ediyorum.

Saygılarımla,
 

Ekli dosyalar

Merhaba,
Formüllerin uzamaması adına öncelikle bir AD tanımlayayın.

Yeni AD için aşağıdaki tanımları yapın.
İsim VeriListesi
Başvuru =KAYDIR(VERİTABANI!$A$7;0;0;BAĞ_DEĞ_DOLU_SAY(VERİTABANI!$A$7:$A$9999);BAĞ_DEĞ_DOLU_SAY(VERİTABANI!$7:$7))

Ana Sayfada
C32 hücresine aşağıdaki formülü yazıp aşağı ve sağa doğru AF32 dahil sürükleyerek çoğaltabilirsiniz.
=EĞERHATA(DÜŞEYARA(METNEÇEVİR($B32;"gg.aa.yyyy");VeriListesi;KAÇINCI(C$31;SOLDAN(KAYDIR(VeriListesi;;;1;SÜTUNSAY(VeriListesi));3);0));0)
Not: Dizi formülü olabilir. Hatalı sonuç üretiyorsa Ctrl+Shift+Enter tuşlarına basarak formülü tamamlayın

AG32 de Total yazan sütun için mevcuttaki veri tabanı sayfasında total değeri 579 yazarken, asıl toplam değer 589 olduğu için aşağıdaki size kalmış
Ben AG32 ye Toplama formülünü yazdım direkt olarak.

Eğer Veri Tabanı sayfasındaki 579 yazan değeri alacaksanız yukarı ilk verdiğim formül yerine aşağıdakini kullanarak tüm sütunlara (C32:AG32) uygulayabilirsiniz. AG32 için toplama formülüne gerek kalmaz.
=EĞERHATA(DÜŞEYARA(METNEÇEVİR($B32;"gg.aa.yyyy");VeriListesi;KAÇINCI(C$31;KIRP(SOLDAN(KAYDIR(VeriListesi;;;1;SÜTUNSAY(VeriListesi));5));0));0)
 
Sayın Ömer Bey,
Ellerinize,emeğinize ve bilginize sağlık. Konu sayenizde amacına ulaşmıştır.
Hakkınızı helal ediniz lütfen.

Saygılarımla,
 
Varsa elbet helal olsun.
Hayırlı akşamlar.
 
Geri
Üst