Makro Topla.Çarpım #DEĞER, Error 2015, type mismatch error 13 Hatası

[hilmitaranci]

Merhabalar,

Dün akşamdan beri uğraşıp nedenini bir türlü bulamadığım bir hata ile ilgili durumu sizinle paylaşmak istiyorum.

Topla.Çarpım ile yaptığım bir formulü;

TOPLA.ÇARPIM((grup!$B$2:$B$869=liste!J2)*(grup!$C$2:$C$869=liste!M2);(grup!$D$2:$D$869))


Makro ile yapmaya çalıştım. Bu siteden bir dünya örnek buldum ve hepsini teker denedim.


Sayfa3.Range("Y" & c) = Evaluate("SumProduct(((SAYFA1!1B2: B869) = """ & sec1 & """ ) * ((SAYFA1!C2:C869) = """ & sec2 & """ ) * (SAYFA1!D2869))")

ancak yazmış olduğum bu formülde sürekli Error 2015 - type mismatch error 13 hatası veriyor. Verilerin bulunduğu Grup sayfasındaki B ve C sütunlarının tamamını metne çevirdim. Ancak problem çözülmüyor.


Fakat formülü R1C1 şekilde yapınca çalışıyor.

Sayfa3.Cells(c, 25) = "=SUMPRODUCT((grup!RC[-23]:R[10000]C[-23]=liste!RC[-15])*(grup!RC[-22]:R[10000]C[-22]=liste!RC[-12]),(grup!RC[-21]:R[10000]C[-21]))"


Benim atladığım nokta nedir? yardımcı olabilirseniz çok sevinirim.

 

[Vedat Özer]

Merhabalar,

Konunuzla alakalı örnek ekleyin.

 

[Korhan Ayhan]

Merhaba,

Mesajınızda "grup" isimli sayfa demişsiniz fakat makroda "SAYFA1" olarak kullanmışsınız. Problem bundan kaynaklanıyor olabilir. Kontrol eder misiniz?

 

[hilmitaranci]

Merhabalar,

Konunuzla alakalı örnek ekleyin.

Çalışma dosyam ektedir.

Grup sayfasında bulunan Hesap Adı ve Tesis Adına denk gelen % oranın Liste sayfasına yazmaya çalışıyorum.

http://s3.dosya.tc/server7/ruiiyn/makrolu_butce.xls.html

 

[hilmitaranci]

Merhaba,

Mesajınızda "grup" isimli sayfa demişsiniz fakat makroda "SAYFA1" olarak kullanmışsınız. Problem bundan kaynaklanıyor olabilir. Kontrol eder misiniz?

Maalesef orayı grup! yapınca da çalışıyor.
Mutlaka olmadık bir yerde hata yaptım ama artık gözüm bile kodları seçemiyor.

 

[Korhan Ayhan]

Aşağıdaki gibi deneyiniz.

Sayfa3.Range("Y" & c) = Evaluate("=SumProduct((grup!B2:B869=""" & sec1 & """ )*(grup!C2:C869=""" & sec2 & """),(grup!D2:D869))")

 

[hilmitaranci]

Aşağıdaki gibi deneyiniz.

Sayfa3.Range("Y" & c) = Evaluate("=SumProduct((grup!B2:B869=""" & sec1 & """ )*(grup!C2:C869=""" & sec2 & """),(grup!D2:D869))")

Çok teşekkür ederim.

Bir eşitti ve parantez nelere yol açtı bende

 

[Korhan Ayhan]

Hilmi Bey,

Eşittir ve parantez dışında sayfa isminde de yazım hatanız vardı.