• DİKKAT !

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak Dosya Yükleme tamamen ücretsizdir.

    Giriş yap veya Şimdi kayıt ol

Çözüldü Topla.Çarpım Formülü

Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
M

mana97

Yeni Üye
Katılım
18 Ağu 2022
Mesajlar
279
Çözümler
31
Aldığı beğeni
103
Excel V
Office 2019 TR
Konu Sahibi
Merhaba,

öğrenmeye çalıştığım bir vba kodu var bir kaç deneme yapıyorum ancak aşağıdaki kod çalışmıyor nerede hata yapıyorum

Function DENEME(s1, s2, s3)

Application.WorksheetFunction.SumProduct ((s1 = s2)) * ((s3))

End Function
 

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.
Tarihe göre sırala Oylara göre sırala
mana97' Alıntı:
Merhaba,

öğrenmeye çalıştığım bir vba kodu var bir kaç deneme yapıyorum ancak aşağıdaki kod çalışmıyor nerede hata yapıyorum

Function DENEME(s1, s2, s3)

Application.WorksheetFunction.SumProduct ((s1 = s2)) * ((s3))

End Function
Genişletmek için tıkla...
HTML:
C#:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Olumlu oy 0 Negatif oyla
Dosyayı inceleyemedim ama önceden application.sumproduct olarak veriler alamamıştım.
Ama evaluate ve sumproduct beraber çalışıyordu.
Yarın bakabilirim.
 
Son düzenleme:
Olumlu oy 0 Negatif oyla
Konu Sahibi
Refaz' Alıntı:
Dosyayı inceleyemedim ama önceden application.sumproduct olarak veriler alamamıştım.
Ama evaluate ve sumproduct beraber çalışıyordu.
Yarın bakabilirim.
Genişletmek için tıkla...
Hocam evaluate ye bende denk geldim forumlarda ancak verilen örneklerde hücrenin adresi manuel yazılıyordu vba kodunda KTF olarak dinamik hale getirmek istiyorum (kodu kullanmayı öğrenebilirsem paramarray ile yapmayı düşünüyorum)
 
Olumlu oy 0 Negatif oyla
Dropbox ile arşivlemiştim.içeriğini unuttum ama indirip bir inceleyin.Ktf ye uyarlanır bence.

Bu bağlantı ziyaretçiler için gizlenmiştir. Görmek için lütfen giriş yapın veya üye olun.
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
Sabah işe gidince pc den verdiğiniz linke bakayım telefondayım şuan teşekkür ederim hocam
 
Olumlu oy 0 Negatif oyla
Tamam.Yapamazsanız bende yarın akşama doğru bakarım.Sadece kodu inceleyip mantığı uygularsınız.
 
Olumlu oy 0 Negatif oyla
Ayrıca aratıncada sonuçlar çıkıyor.Sizin konuya uygun örnek altta.Ve sımif ysni etopla da size bence tam uyar toplaçarpım yerine.

Bu bağlantı ziyaretçiler için gizlenmiştir. Görmek için lütfen giriş yapın veya üye olun.
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
Refaz' Alıntı:
Ayrıca aratıncada sonuçlar çıkıyor.Sizin konuya uygun örnek altta.Ve sımif ysni etopla da size bence tam uyar toplaçarpım yerine.

Bu bağlantı ziyaretçiler için gizlenmiştir. Görmek için lütfen giriş yapın veya üye olun.
Genişletmek için tıkla...
Oda olur ancak kafamda kurguladığım bir KTF var topla.çarpımın vermiş olduğu özelliği çoketopla ile düşayarayı birleştirerek parantezleri ile çok uğraşmadan yazımı ve kullanımı kolay bir KTF üretmeyi hedefliyorum
 
Olumlu oy 0 Negatif oyla
Tamam hocam,işiniz bence görülür önemli olsn & olarak kullanılacağı için doğru ayarlayabilmek.
 
Olumlu oy 0 Negatif oyla
Alternatif.
ETOPLA da kullanabilirsiniz.
HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Olumlu oy 0 Negatif oyla
Refaz' Alıntı:
Function DENEME(s1, s2 As Range, s3 As Range) Application.Volatile DENEME = Evaluate("SumProduct((" & s2.Address & " = """ & s1 & """) * (" & s3.Address & "))") End Function
Genişletmek için tıkla...
Alttaki gibide olabilir ama deneyemedim.

HTML:
C#:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Olumlu oy 0 Negatif oyla
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst