Makroyla formül girmede hata

[gkhnaktas]

Saygılar

makroyla aşağıdaki formülü hücreye girmeye çalışırken, hücrede "ERR" olarak çıkmasını istediğim değeri getiremedim.

=EĞER(EHATALIYSA(YUVARLA(1500/(C6*M6);0));"ERR";YUVARLA(1500/(C6*M6);0))

bu formülü makroyla

ActiveCell.Formula = "=if(iserror(round(1500/(C6*M6)" & ",0))" & "," & "ERR" & "," & "round(1500/(C6*M6)" & ",0))"

şeklinde girdiğimde

=EĞER(EHATALIYSA(YUVARLA(1500/(C6*M6);0));ERR;YUVARLA(1500/(C6*M6);0))

formülünü veriyor. Bu formülde ad hatası veriyor.

Birçok kombinasyon denedim fakat "ERR" yi doğru şekilde giremedim.

Yardımlarınız için şimdiden çok teşekküler.

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki şekilde denermisiniz.

ActiveCell.Formula = "=IF(ISERROR(ROUND(1500/(C6*M6)" & ",0))" & "," & [COLOR=red][B]"""ERR"""[/B][/COLOR] & "," & "ROUND(1500/(C6*M6)" & ",0))"

 

[gkhnaktas]

Çok teşekkürler Sn. Korhan Ayhan. Kod çalışıyor.