İki kriter bazlı formülü koda çevirme hk.

Katılım
19 Şubat 2007
Mesajlar
630
Excel Vers. ve Dili
Ofis 365 Tr- 64 Bit
Altın Üyelik Bitiş Tarihi
08-01-2024
Sayın Çok Kıymetli Hocalarım formülle getirmiş olduğum veriler koda çevirme imkanımız olabilir mi ? formülle çok kasıyor. Excel donuyor. lütfen yardımcı olabilir misiniz. çok teşekkür ederim.
kullanmış olduğum formüller aşağıdadır.

1.) =TOPLA.ÇARPIM((Bileşenler!$M$3:$M$100000=A2)*(Bileşenler!$N$3:$N$100000=B2)*(Bileşenler!$O$3:$O$100000))
2.) =TOPLA.ÇARPIM((Bileşenler!$R$3:$R$100000=A2)*(Bileşenler!$S$3:$S$100000=B2)*(Bileşenler!$T$3:$T$100000))
3.) =TOPLA.ÇARPIM((Bileşenler!$R$3:$R$100000=A2)*(Bileşenler!$S$3:$S$100000=B2)*(Bileşenler!$U$3:$U$100000))
4.) =TOPLA.ÇARPIM((Bileşenler!$Z$3:$Z$100000=A2)*(Bileşenler!$AA$3:$AA$100000=B2)*(Bileşenler!$AB$3:$AB$100000))
5.) =EĞERHATA(İNDİS(Bileşenler!$M$3:$P$100000;KAÇINCI(A2&B2;Bileşenler!$M$3:$M$100000&Bileşenler!$N$3:$N$100000;0);4);"")
6.) =EĞERHATA(İNDİS(Bileşenler!$R$3:$V$100000;KAÇINCI(A2&B2;Bileşenler!$R$3:$R$100000&Bileşenler!$S$3:$S$100000;0);5);"")
7.) =EĞERHATA(İNDİS(Bileşenler!$R$3:$W$100000;KAÇINCI(A2&B2;Bileşenler!$R$3:$R$100000&Bileşenler!$S$3:$S$100000;0);6);"")
8.) =EĞERHATA(İNDİS(Bileşenler!$R$3:$X$100000;KAÇINCI(A2&B2;Bileşenler!$R$3:$R$100000&Bileşenler!$S$3:$S$100000;0);7);"")
 
Katılım
19 Şubat 2007
Mesajlar
630
Excel Vers. ve Dili
Ofis 365 Tr- 64 Bit
Altın Üyelik Bitiş Tarihi
08-01-2024
Sayın Hocalarım getirmek istediğim yerleri zemin rengini sarı ile boyadım. zaten göndermiş olduğum formüller o işi yapıyor. excel de donma yapıyor. ve çok kasıyor lütfen formülleri koda çevirebilir miyiz. çok teşekkür ederim.
 

Ekli dosyalar

Katılım
19 Şubat 2007
Mesajlar
630
Excel Vers. ve Dili
Ofis 365 Tr- 64 Bit
Altın Üyelik Bitiş Tarihi
08-01-2024
Arkadaşlar lütfen yardımcı olabilirmisiniz. Çok teşekkür ederim.
 
Katılım
19 Şubat 2007
Mesajlar
630
Excel Vers. ve Dili
Ofis 365 Tr- 64 Bit
Altın Üyelik Bitiş Tarihi
08-01-2024
Arkadaşlar lütfen yardımcı olabilirmisiniz. Çok teşekkür ederim.
 

muygun

Özel Üye
Katılım
6 Temmuz 2004
Mesajlar
9,181
Excel Vers. ve Dili
Excel-2003 Türkçe
Merhaba;
Kriterlerinizde farklılık var.
Bu nedenle bir analiz adlı makro oluşturdum ve bir sütun için toplam aldırdım.
Diğerlerini de siz makro içerisindeki alana yerleştirin.
İyi çalışmalar.

Not: Formülünüzde ;
1.) =TOPLA.ÇARPIM((Bileşenler!$M$3:$M$100000=A2)*(Bileşenler!$N$3:$N$100000=B2)*(Bileşenler!$O$3:$O$100000))
alanı uyuşmuyor. Başında M harfi var? Kontrol edin.

İyi çalışmalar.
 

Ekli dosyalar

Katılım
19 Şubat 2007
Mesajlar
630
Excel Vers. ve Dili
Ofis 365 Tr- 64 Bit
Altın Üyelik Bitiş Tarihi
08-01-2024
Sayın Muygun Hocam öncelikle çok çok teşekkür ederim. çok sağolun İndis formülünü bu kodun içine nasıl dahil edebilirim. aşağıdaki formülü hocam en azından birini yaparsınız ben diğerlerini bakarak düzenleyebilirim.
 

muygun

Özel Üye
Katılım
6 Temmuz 2004
Mesajlar
9,181
Excel Vers. ve Dili
Excel-2003 Türkçe
Merhaba;
Ekli dosyaya bir adet örnek ekledim.
İnceleyin.
Not: Özel mesajınızda belirttiğiniz hatalı toplama sorununu anlamadım. (ihtimalle verilerinizde mükerrer kayıtlar var. Verilerinizi kontrol edin)
İyi çalışmalar.
 

Ekli dosyalar

Katılım
19 Şubat 2007
Mesajlar
630
Excel Vers. ve Dili
Ofis 365 Tr- 64 Bit
Altın Üyelik Bitiş Tarihi
08-01-2024
Sayın Muygun Hocam verilerde 1 den fazla aynı veri olabiliyor. sadece adetler farklı bende topla.çarpım formülü toplamları özet sayfasında verileri önce birleştiriyorum daha sonra toplam çarpım formülü ile adetlerin toplamını verilerin karşısına yazdırıyorum. Index Match formülü ile de diğer verileri getiriyorum oda çok kasıyor hatta Excel de donma oluyor. koda çevirerek hem kasma hem de donma olayını çözmek istiyorum. çok çok teşekkür ederim.
 
Üst