• Merhaba Ziyaretçi,
    Microsoft 365 Uygulamaları ile ilgili yeni haberler, dikkat çekici konular, ilgi ile takip edeceğiniz yazılar için.

    Abone Olun
  • ESTE - Microsoft Office Eğitimleri

    Yeni yıl Microsoft Office Eğitim planlarınız için bütçenizi oluşturmadan önce ESTE eğitim kalitesi ile tanışın. 🙌
    Kullanıcıların ihtiyacı olan yazılı materyal, dosya ve video kaynağı desteğimiz ile tüm ofis çalışanlarının iş süreçlerini rahatlatacak eğitimler planlayın. 🎯
    Microsoft Office eğitimlerimiz hakkında detaylı bilgi için bize ulaşın.

    👉 Microsoft Office Eğitim Talebi

Çözüldü Düşeyara Raporlama Sorunu

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

Rahle

Yeni Üye
Katılım
20 Haz 2018
Mesajlar
137
En iyi yanıt
0
Puanları
18
Yaş
51
Konum
İstanbul
Ad Soyad
Huzeyfe Yaman
Office Vers.
Office 2010
Selamlar,

Düşeyara formülünün bütün varsayımları üzerinde çalıştım ancak işin çıkamadım.

Ekteki Excel'de (VERİ sayfasında var, EXCEL de yok. - EXCEL sayfasında var, VERİ sayfasında yok) ayrı bir raporlama sayfası nasıl oluşturabilirim?

Teşekkürler
 

Ekli dosyalar

  • Kitap1.xlsx
    13.6 KB · Görüntüleme: 22

Rahle

Yeni Üye
Katılım
20 Haz 2018
Mesajlar
137
En iyi yanıt
0
Puanları
18
Yaş
51
Konum
İstanbul
Ad Soyad
Huzeyfe Yaman
Office Vers.
Office 2010
Düzeltme: Seri Numarası üzerinden fark raporu oluşturacaktır.
 

AhmetRasim

Yeni Üye
Katılım
21 Haz 2018
Mesajlar
6
En iyi yanıt
0
Puanları
3
Konum
İstanbul
Ad Soyad
Ahmet Rasim
Merhabalar;
Veri Sayfasındaki kayıtları Excel Sayfasında aramak için
Kod:
=EĞERHATA(EĞER(DÜŞEYARA(VERİ!E2;EXCEL!$E$2:$E$32;1;0)=VERİ!E2;"Excel Sayfasında Var");"Excel Sayfasında Yok")

Excel Sayfasındaki kayıtları Veri Sayfasında aramak için
Kod:
=EĞERHATA(EĞER(DÜŞEYARA(EXCEL!E2;VERİ!$E$2:$E$32;1;0)=EXCEL!E2;"Veri Sayfasında Var");"Veri Sayfasında Yok")
formüllerini deneyiniz.
 

Rahle

Yeni Üye
Katılım
20 Haz 2018
Mesajlar
137
En iyi yanıt
0
Puanları
18
Yaş
51
Konum
İstanbul
Ad Soyad
Huzeyfe Yaman
Office Vers.
Office 2010
Selamlar,

Ahmet Bey tamamdır. Fonksiyonlar gayet iyi çalışıyor, problem yok. Aslında 30.000 satır üzerinde bu işlemleri yapmak Excel uygulamasını epey yoruyor. Bir kod yazdıktan sonra programın hesaplama yapmasını bekliyorsunuz. VBA olsa daha iyi olabilirdi.

İlginiz ve yardımınız için teşekkür ederim, hakkınızı helal ediniz.
 

AhmetRasim

Yeni Üye
Katılım
21 Haz 2018
Mesajlar
6
En iyi yanıt
0
Puanları
3
Konum
İstanbul
Ad Soyad
Ahmet Rasim
Merhabalar;
Rica ederim helal olsun ne demek.

Makro olarak şu şekilde dener misiniz?
Kod:
Sub karsilastirma()
For i = 2 To Sheets("VERİ").Range("E" & Rows.Count).End(3).Row
For x = 2 To Sheets("EXCEL").Range("E" & Rows.Count).End(3).Row

    If Sheets("VERİ").Cells(i, "E") = Sheets("EXCEL").Cells(x, "E") Then Sheets("VERİ").Cells(i, "F").Value = "Excel Sayfasında Var"
    If Sheets("EXCEL").Cells(x, "E") = Sheets("VERİ").Cells(i, "E") Then Sheets("EXCEL").Cells(x, "F").Value = "Veri Sayfasında Var"
    If Sheets("VERİ").Cells(i, "F") = Empty Then Sheets("VERİ").Cells(i, "F") = "Excel Sayfasında Yok"
    If Sheets("EXCEL").Cells(x, "F") = Empty Then Sheets("EXCEL").Cells(x, "F") = "Veri Sayfasında Yok"
    
Next
Next
End Sub
 

Rahle

Yeni Üye
Katılım
20 Haz 2018
Mesajlar
137
En iyi yanıt
0
Puanları
18
Yaş
51
Konum
İstanbul
Ad Soyad
Huzeyfe Yaman
Office Vers.
Office 2010
Ahmet Bey selamlar,

Bu daha güzel oldu... Emeğiniz ve paylaşımınız için teşekkür ederim.

Kolay gelsin.
 
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Üst Alt