VBA'da kod çalıştırırken hata veriyor

[byznr]

kodları yazıyorum ama hata veriyor.Nasıl çözüm bulabilirim yardımcı olursanız çok sevinirimEkli dosyayı görüntüle dddd.xlsm

 

[cenk e.]

Merhaba, if bloğunu end if ile bitimemişsiniz hata buradan kaynaklanıyor.

 

[byznr]

şuan end ıf ile bitirdim ama hala çalışmıyor

 

[apismellifera]

End if'i yanlış yere koymuşsunuzdur. Dosyanız ekte çalışıyor.

 

[sametozyavuz]

i ve j yi aynı tanımlamışsınız ondandır.

 

[byznr]

eğer düzeltip paylaşırsanız çok iyi olur çok fazla oldum ama

 

[cenk e.]

Merhaba, Sn. apismellifera'nın eklediği dosya düzgün bir şekilde çalışıyor.
İsterseniz

=TOPLA.ÇARPIM(--(B2:B36>=100))

bu formülü 6 sütun boyunca kopyaladıktan sonra makroyu çalıştırıp karşılaştırın, aynı sonuçları verdiğini göreceksiniz.

 

[byznr]

çok teşekkr ederim hepinize çalıştırdım