Sumproduct formulunu vba ile yapmak

[haso_excel]

Merhaba arkadaşlar,
Database sheetimden, aynı çalışma dosyasında olan başka bir sheet de 3 farklı kritere baktırarak veri alıyorum, fakat sumproductın özelliğinden olsa gerek çok fazla takılıyor.
Aynı işi VBA ile yapmak mümkün mü acaba.
Database sheetinde A2: A nerde biterse = Depo B2 hücresi
Database sheetinde C2: C nerde biterse = "Depo"
Database sheetinde D2: D nerde biterse = Depo D1 e eşit olanları, database de D1:Xin bittiği hücre aralığından toplamlarını Depo da D2 hücresin den başlayarak yazacak.
Depo sheetindeki formullere bakıldığında da ne yapmak istediğimi anlayacaksınızdır. Sonuç olarak o formulleri VBA ile yapmak mümkünse
çok makbule geçer.
Dosyam ekte

 

[Huseyinkis]

Ekteki dosyayı incelermisiniz Pivot Table kullanarak hazırlandı istediğiniz veriyi saniyeler içerisinde hazırlayacaktır. Pivot Table kullanımı ile ilgili forumdan veya Goggle dan arama yapabilirsiniz.