evaluate topla.çarpım

[Erdem Akdemir]

Aşağıdaki fonksiyonu evaluate ile nasıl yazabilirim

Onlarca deneme yapmama rağmen vba'da yazamadım

TOPLA.ÇARPIM(ALTTOPLAM(9;KAYDIR(F2:F3000;SATIR(F2:F3000)-SATIR(F2);;1))*(F2:F3000>0))

 

[Erdem Akdemir]

güncel....

 

[Ömer]

Merhaba,

Sub Evalute()
[G1] = Evaluate("=SumProduct(SubTotal(9,Offset(F2:F3000,Row(F2:F3000)-Row(F2),,1))*(F2:F3000>0))")
End Sub

Denermisiniz..

.

 

[Erdem Akdemir]

Merhaba,

Sub Evalute()
[G1] = Evaluate("=SumProduct(SubTotal(9,Offset(F2:F3000,Row(F2:F3000)-Row(F2),,1))*(F2:F3000>0))")
End Sub

Denermisiniz..

.

Ömer bey kod çalıştı teşekkür ederim

Fonksiyon özelliğini excel'de devam ettirecek şekilde nasıl yaparım

Sumprodcut'ı worksheetfunction'da ekleyerek çalıştıramadım

 

[Bosnalı Yasemin]

Evaluate kullanımı

Bu formül eğer bir dizi formülü olsaydı nasıl kullanılırdı ?

 

[Korhan Ayhan]

Selamlar,

Dizi formülleride aşağıdaki şekilde EVALUATE komutuiçine alarak VBA bölümünde kullanabilirsiniz.

Bu formül eğer bir dizi formülü olsaydı nasıl kullanılırdı ?

MsgBox Evaluate("=DİZİ_FORMÜLÜNÜZ")

 

[Korhan Ayhan]

Selamlar,

Sn. kuvari,

Aşağıdaki ifadeden kastınız nedir?

Fonksiyon özelliğini excel'de devam ettirecek şekilde nasıl yaparım