daha hızlı formül

[coşkun79]

okuduklarıma göre topla çarpım formülü hesaplamayı biraz yavaşlatıyormuş. benim de
=TOPLA.ÇARPIM((((B3:F3)/2)<>NSAT((B3:F3)/2))*(B3:F3<>""))
şeklinde bir formülüm var.

binlerce satırlık bir sayfam var. hesaplamayı hızlandırmak adına bu formülü başka bir şekilde yazmak mümkün mü acaba

 

[Korhan Ayhan]

Bu formülle ne elde ediyorsunuz?

 

[coşkun79]

b ve f sütunları arasındaki tek sayıların adedini buluyorum

 

[Korhan Ayhan]

Deneyiniz..

Dizi formüldür.

=TOPLA(MOD(B3:F3;2))

 

[Ömer BARAN]

Merhaba.

Dizi formülü olmasın derseniz; mevcut formülünüze alternatif.
Ayrıca ne mevcut formülünüz ve ne de aşağıdaki TOPLA.ÇARPIM formülü belgeyi pek yavaşlatmaz gibi görünüyor.
.

=TOPLA.ÇARPIM((MOD(B3:F3;2)=1)*1)

 

[coşkun79]

Korhan Bey çok teşekkür ederim..

 

[coşkun79]

Ömer bey size de teşekkür ederim. amacım binlerce satırlık tablolarda en hızlı formülü uygulamak.
bu iki formülden hangisi tablomda süzme işlemi ve veri girişi yaparken daha az kasmaya neden olur

 

[Ömer BARAN]

Aşağıdaki gibi bir kodla; her iki TOPLA.ÇARPIM işlevini ve Sayın AYHAN'ın dizi formülünü ayrı ayrı sayfalarda aynı veriler için uygulayıp hız bakımından deneyerek kendiniz karar vermelisiniz.
.

Sub hız()
Application.Calculation = xlCalculationManual
    zaman = Timer
    ActiveSheet.Calculate
    MsgBox Format(Timer - zaman, "0.000") & " saniye"
Application.Calculation = xlCalculationAutomatic
End Sub