Compile error: Syntax error

[fredycrouger]

Merhaba,

Otomasyon amaciyla Bir tablodan baska bir tabloya formulleri kopyalamaya calisiyorum fakat her seferinde "Compile error: Syntax error" hatasi aliyorum. Kullandigim formul asagidaki gibidir:

=IF(AND(IF(N2="NO","TRUE","FALSE"),IF(O2="NO","TRUE","FALSE"))=TRUE,"YES","NO")
=IF(AND(A2<>0,U2=0,V2=0,W2=0),"Yes",IF(AND(LEFT(U2,3)<>"tvd",V2=0,W2=0),"No",IF(AND(U2<>0,V2<>0,W2<>0,LEFT(U2,3)<>"tvd",LEFT(V2,3)<>"tvd",LEFT(W2,3)<>"tvd"),"No","Yes")))

Formulleri macro kaydi ile kopyala yapistir yaptigimda asagidaki gibi kayit ediyor:

Range("P2").Select
ActiveCell.FormulaR1C1 = _
"=IF(AND(IF(RC[-2]=""NO"",""TRUE"",""FALSE""),IF(RC[-1]=""NO"",""TRUE"",""FALSE""))" =TRUE,""YES"",""NO"")"

Range("X2").Select
ActiveCell.FormulaR1C1 = _
"=IF(AND(RC[-23]<>0,RC[-3]=0,RC[-2]=0,RC[-1]=0),""Yes"",IF(AND(LEFT(RC[-3],3)<>""tvd"",RC[-2]=0,RC[-1]"=0),""No"",IF(AND(RC[-3]<>0,RC[-2]<>0,RC[-1]<>0,LEFT(RC[-3],3)<>""tvd"",LEFT(RC[-2],3)<>""tvd"",LEFT(RC[-1],3)

Yardimlariniz icin simdiden cok tesekkurler

 

[turist]

Örnek:
Range("P2").Select
ActiveCell.FormulaR1C1 = _
"=IF(AND(IF(RC[-2]=""NO"",""TRUE"",""FALSE""),IF(RC[-1]=""NO"",""TRUE"",""FALSE"")) =TRUE,""YES"",""NO"")"

ya da;


Range("P2").Select
ActiveCell.Formula = "=IF(AND(IF(N2=""NO"",""TRUE"",""FALSE""),IF(O2=""NO"",""TRUE"",""FALSE""))=TRUE,""YES"",""NO"")"

şeklinde deneyin.

 

[fredycrouger]

Sayin @turist Tesekkurler.

Ben tum formulu bir not defterine kaydedip gerekli oldukca ordan kullanmayi dusunmustum fakat her kaydedisimde otomatikmen bir seyler degisiyordu ve Syntax hatasi aliyordum. Sanirim UTF-8 & ANSI dil kodlamasiyla ilgili bir durum. Formulu VBA olara bir excel dosyasinda kaydettim ve gerekli oldukca oradan kullaniyorum. Sorun bu sekilde cozulmus oldu.

Saygilarimla
Iyi calismalar.
Ferdi