pmgnasiri
2019/03/01, 14:03
سلام کدی نوشتم که وقت اجرا این ارور رو میده
run-time error 1004 : Application-defined or object-defined errorقسمتی از کد که این ارور رومیده اینه:
sheet.Range("AC79:AC" &lastcount).FormulaR1C1 =& _
"=IF(AND((R[-1]C[-21]>R[-1]C[-17]),(RC[-17]>RC[-21]),(RC[-17]>=R[-1]C[-21]),(R[-1]C[-17]>=RC[-21]),((RC[-17]-RC[-21])>(R[-1]C[-17]-R[-1]C[-21]))),""BUY"",IF(AND((RC[-13]-RC[-14])>3*(RC[-21]-RC[-17]),((RC[-17]-RC[-14])/(0.001+RC[-13]-RC[-14])>0.6),((RC[-21]-RC[-14])/(0.001+RC[-13]-RC[-14])>0.6)),""BUY"",IF(AND((R[-1]C[-17]<R[-1]C[-21]),(((R[-1]C[-21]+R[-1]C[-17])/2)<R" & _
"(RC[-21]<RC[-17]),(RC[-21]<R[-1]C[-17]),(RC[-17]<R[-1]C[-21]),((RC[-17]-RC[-21])/(0.001+(RC[-13]-RC[-14]))>0.6)),""BUY"",IF(AND((R[-1]C[-21]>R[-1]C[-17]),(RC[-17]>RC[-21]),(RC[-17]<=R[-1]C[-21]),(R[-1]C[-17]<=RC[-21]),((RC[-17]-RC[-21])<(R[-1]C[-21]-R[-1]C[-17]))),""BUY"",IF(AND((R[-2]C[-21]>R[-2]C[-17]),((R[-2]C[-21]-R[-2]C[-17])/(0.001+R[-2]C[-13]-R[-2]C[-14])>0.6" & _
"[-17]>R[-1]C[-21]),(R[-1]C[-21]>R[-1]C[-17]),((R[-1]C[-13]-R[-1]C[-14])>(3*(R[-1]C[-17]-R[-1]C[-21]))),(RC[-17]>RC[-21]),(RC[-21]>R[-1]C[-21])),""BUY"",IF(AND((R[-1]C[-21]>R[-1]C[-17]),(RC[-21]>=R[-1]C[-21]),(RC[-17]>RC[-21])),""BUY"",IF(AND(((RC[-13]-RC[-14])>4*(RC[-21]-RC[-17])),((RC[-13]-RC[-17])/(0.001+RC[-13]-RC[-14])>=0.75),((RC[-13]-RC[-21])/(0.001+RC[-13]-RC" & _
"[-14])>=0.75)),""BUY"",""BUYNOT"")))))))"
لطفا کمک کنید برای رفع اون چیکار کنم
run-time error 1004 : Application-defined or object-defined errorقسمتی از کد که این ارور رومیده اینه:
sheet.Range("AC79:AC" &lastcount).FormulaR1C1 =& _
"=IF(AND((R[-1]C[-21]>R[-1]C[-17]),(RC[-17]>RC[-21]),(RC[-17]>=R[-1]C[-21]),(R[-1]C[-17]>=RC[-21]),((RC[-17]-RC[-21])>(R[-1]C[-17]-R[-1]C[-21]))),""BUY"",IF(AND((RC[-13]-RC[-14])>3*(RC[-21]-RC[-17]),((RC[-17]-RC[-14])/(0.001+RC[-13]-RC[-14])>0.6),((RC[-21]-RC[-14])/(0.001+RC[-13]-RC[-14])>0.6)),""BUY"",IF(AND((R[-1]C[-17]<R[-1]C[-21]),(((R[-1]C[-21]+R[-1]C[-17])/2)<R" & _
"(RC[-21]<RC[-17]),(RC[-21]<R[-1]C[-17]),(RC[-17]<R[-1]C[-21]),((RC[-17]-RC[-21])/(0.001+(RC[-13]-RC[-14]))>0.6)),""BUY"",IF(AND((R[-1]C[-21]>R[-1]C[-17]),(RC[-17]>RC[-21]),(RC[-17]<=R[-1]C[-21]),(R[-1]C[-17]<=RC[-21]),((RC[-17]-RC[-21])<(R[-1]C[-21]-R[-1]C[-17]))),""BUY"",IF(AND((R[-2]C[-21]>R[-2]C[-17]),((R[-2]C[-21]-R[-2]C[-17])/(0.001+R[-2]C[-13]-R[-2]C[-14])>0.6" & _
"[-17]>R[-1]C[-21]),(R[-1]C[-21]>R[-1]C[-17]),((R[-1]C[-13]-R[-1]C[-14])>(3*(R[-1]C[-17]-R[-1]C[-21]))),(RC[-17]>RC[-21]),(RC[-21]>R[-1]C[-21])),""BUY"",IF(AND((R[-1]C[-21]>R[-1]C[-17]),(RC[-21]>=R[-1]C[-21]),(RC[-17]>RC[-21])),""BUY"",IF(AND(((RC[-13]-RC[-14])>4*(RC[-21]-RC[-17])),((RC[-13]-RC[-17])/(0.001+RC[-13]-RC[-14])>=0.75),((RC[-13]-RC[-21])/(0.001+RC[-13]-RC" & _
"[-14])>=0.75)),""BUY"",""BUYNOT"")))))))"
لطفا کمک کنید برای رفع اون چیکار کنم